B 1 

CZTHCDO TMll DATA RELIAB NACY11 30A(1052) 03-JUN-80 15:27 PAGE 1 

CZTMCD.Pll 03-JUN-80 15:26 SEQ 0001 

1 .REM ! 
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18 IDENTIFICATION 



AC-9402D-MC 

CZTMCDO TM11 DATA RELIAB 
MAY 1980 



19 

20 PRODUCT CODE 

21 

22 PRODUCT NAME 

23 

24 PROGRAM DATE 

25 

26 MAINTAINER: DIAGNOSTIC GROUP 

27 
28 
29 

30 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 

31 NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 

32 EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 

33 NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 
34 

35 THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A 

36 LICENSE AND NAY ONLY BE USED OR COPIED IN ACCORDANCE WITH THE 

37 TERMS OF SUCH LICENSE. 
38 

39 DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 

40 THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 

41 NOT SUPPLIED BY DIGITAL. 
42 

43 COPYRIGHT (C) 1970, 1980 BY DIGITAL EQUIPMENT CORPORATION 
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44 
45 
46 
47 
48 
49 

50 1. ABSTRACT 

51 

52 THE TM11 DATA RELIABILITY PROGRAM COLLECTS STATISTICAL 

53 INFORMATION PERTAINING TO THE DATA RELIABILITY OF THE TMII, TU10 

54 WHEN RUN FOR EXTENDED PERIODS OF TIME. IT USES A NLMBER OF 

55 DIFFERENT PARAMETERS CONTROLLING DATA PATTERNS, PARITY, DENSITY 

56 RECORD LENGTHS, WRITING AND READING SEQUENCES AND STOPPING MODES 

57 (NONSTOP, START-STOP, RANDOM STALL DELAY). 
58 

59 2. REQUIREMENTS 

60 

61 2.1 EQUIPMENT 

62 

63 PDP-11 WITH TM11 AND 1 TO 8 TU10 TAPE UNITS (7 CHAAWEL ONLY) 

64 

65 2.2 STORAGE 

66 

67 2.2.1 PROGRAM STORAGE 

68 

69 THE ROUTINE REQUIRES 4K OF MEMORY. 

70 

71 2.3 PRELIMINARY PROGRAMS 

72 

73 THE TM11 INSTRUCTION TEST AND TM11 DRIVE FUNCTION TIMER MUST RUN 

74 PROPERLY BEFORE ATTEMPTING TO USE THIS PROGRAM. 
75 

76 3. LOADING PROCEDURE 

77 

78 3.1 METHOD 

79 

80 PROCEDURE FOR NORMAL BINARY TAPES SHOULD BE FOLLOWED: 

81 

82 1. ABSOLUTE LOADER MUST BE IN MEMORY. 

83 2. PLACE BINARY TAPE IN READER. 

84 3. LOAD ADDRESS *7500 (• DETERMINED BY LOCATION OF LOADER) 

85 4. PRESS "START" (PROGRAM WILL LOAD). 
86 

87 4. STARTING PROCEDURE 

88 

89 4.1 CONTROL SWITCH SETTINGS 

90 

91 FOR INITIAL OPERATION OF PROGRAM ALL SWITCHES SHOULD BE = 0 

92 (OR DOWN). 
93 

94 4.2 STARTING ADDRESS 

95 

96 200 - BASIC TEST (AUTOMATIC PARAMETER AND UNIT SELECTION) 

97 

98 204 - OPERATOR CONTROLLED PARAMETER TEST (WITH 4SC MEMORY AVAILABLE) 

99 
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4.3 PROGRAM AND/OR OPERATOR ACTION 

LOAD PROGRAM INTO MEMORY 

SET DESIRED TUlO TAPE UNITS ON-LINE 

LOAD STARTING ADDRESS 200 (204 OR 210 TO SELECT P/^RAMETERS AND UNITS) 

PRESS START-PROGRAM WILL BEGIN TESTING FOR LOAD ADDRESS Of 200 OTHERWISE 

SELECT TAPE UNITS (REFERENCE 4.3.1.1) 

SELECT PARAMETERS (REFERENCE 4.3.2) 

TYPE CARRIAGE RETURN AND PROGRAM WILL BEGIN TESTING. 

4.3.1 TAPE UNIT SELECTION 

STARTING THE PROGRAM AT 200 WILL RESUl T IN AUTOMATIC SELECTION 
OF THE UNITS TO BE TESTED (REFERENCE 4.3.1.2) OTHERWISE STARTING 
AT 204 OR 210 WILL ALLOW OPERATOR TO SELECT UNITS. 

THE PROGRAM WILL TYPE 'mECT \MillS". ANY CONFIGURATION OF 
1 TO 8 UNITS MAY BE SELECTED BY TYPING THE UNIT NUMBERS ON 
THE TELETYPE. ANY SEQUENCE OF NUMBERS MAY BE TYPED. AFTER 
EACH NlfBER IS TYPED A COWA (J WILL BE PRINTED. TYPING THE 
SAME UNIT NlfOER TWICE WILL CAUSE THAT IMIT NIMBER TO BE DELETED. 
TYPING ANY KEY OTHER IHM 0 THRU 7 WILL CAUSE A QUESTION MARK 
(?) TO BE PRINTED AND THAT KEY WILL BE lOttRED. 

TO TERMINATE UNIT SELECTION TYPE A CARRIAGE RETURN. WHEN 
CARRIAGE RETURN IS TYPED THE PROGRAM WILL CONTINUE TO THE 
'PARAMETER SELECTION" UNLESS NO UNITS WFRE SELECTED AND IN 
THAT EVENT WILL RETURN TO THE BEGINNING OF 'SELECT UNITS". 

4.3.1.1 TAPE UNIT SELECTION EXAMPLES 

SELECT UNITS 3,4,5 
SELECT UNITS 5.3,4 

IN EITHER CASE, UNITS 3,4,5 ARE SELECTED. 

SELECT UNITS 
SELECT UNITS 

A CARRIAGE RETURN WAS TYPED WITH NO UNITS SELECTED. 

SELECT UNITS 1,9?, 1,2 

ONLY UNIT 2 SELECTED, UNIT 1 WAS DELETED (TYPED TWICE) 
AND THE 9 WAS IGNORED. 

4.3.1.2 STARTING AT 200 WILL RESULT IN AUTOMATIC SELECTION OF UNITS TO 
BE TESTED. A UNIT WILL BE SELECTED FOR TESTING IF IT MEETS THE 
FOLLOWING CRITERIA: 
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1. IT IS ON-LINE 

2. IT IS SEVEN(7) TRACK 

3. IT IS WRITE ENABLED 

IF THE ABOVE CRITERIA IS NOT MEET BY AT LEAST ONEd) UNIT 
OPERATOR SELECTION WILL BE REQUIRED (REFERENCE 4.3,1). 



4.3.2 PARAMETER SELECTION 

STARTING THE PROGRAM AT 200 WILL RESULT IN AN AUTOMATIC SELECTION 
OF TEST PARAMETERS (REFERENCE 4.3.2.10) OTHERWISE STARTIN(i AT 
ADDRESS 204 OR 210 WILL ALLOW OPERATOR TO SELECT PARAMETERS. 
THERE ARE SEVEN TYPES OF PARAMETERS TO BE CONTROLLED BY THE 
OPERATOR. THEY INCLUDE: TEST NIWBER, PATTERN, PARITY. DENSITY 
RECORD LENGTH. WRITE MODE, AND READ MODE. THE PROGRAM WILL PRINT 

•7ST PAT PAR DEN RLS WMO RMO" 

TST=TEST NUMBER 
PAT=PATTERN 
PAR=PARJTY 
DEN=DENS1TY 

RLS=RECORD LENGTH SEQUENCE 
l«)=WRITE START/STOP MODE 
RMO=READ START/STOP MODE 

4.3.2.1 TEST NUMBER 

THERE ARE 6 TESTS AVAILABLE FOR SELECTION (0 THRU 5). 



TEST 
0 

1 



DESCRIPTION 

WRITE 1 RECORD, REPEAT ON ALL UNITS. CONTINUE 
OF TAPE. 



'0 END 



WRITE 256 RECORDS, REPEAT FOR ALL UNITS, CONTINUE TO END 
Of TAPE. 

WRITE 256 RECORDS, REPEAT FOR ALL UNITS, BACKSPACE 256 
RECORDS, REPEAT FOR ALL UNITS, READ 256 RECORDS, REPEAT 
FOR ALL UNITS , CONTINUE TO END OF TAPE. 

WRITE 1 RECORD. REPEAT FOR ALL UNITS, BACKSPACE, REPEAT 
FOR ALL UNITS, READ 1 RECORD, REPEAT FOR ALL UNITS, 
CONTINUE TO END OF TAPE. 

WRITE 1 RECORD, REPEAT FOR ALL UNITS, REPEAT FOR 256 
RECORDS, BACKSPACE 256 RECORDS, REPEAT FOR ALL UNITS. 
READ 1 RECORD, REPEAT FOR ALL UNITS. REPEAT FOR 256 
RECORDS, CONTINUE TO END OF TAPE. 

READ 1 RECORD, REPEAT FOR ALL UNITS. CONTINUE TO END 
OF TAPE. 
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212 
213 
2H 
215 

216 A. 3.2. 2 PATTERN 

217 

218 THERE ARE 8 DATA PATTERNS AVAILABLE FOR SELECTION (0 THRU 7) WITH EACH PARITY. 

219 

220 PATTERN DESCRIPTION DATA 

221 

222 0 (EVEN) HIGH FREQUENCY OUTSIDE SKEW C<: 

223 01 
22^ ETC 
225 

226 0 (ODD) HALF FREQUENCY OUTSIDE SKEW 01 

Zl? 00 
226 01 

229 00 

230 ETC 
231 

232 1 (EVEN) SLIDING '0" 37 

233 - 57 

234 67 

235 73 

Ill 

2A0 1 (ODD) SLIDING 'T' 40 

in 20 
2A2 10 



2A3 
2A4 



4 
2 



2A5 1 

246 ETC 
247 

248 2 (EVEN) HIGH FREQUENCY ALTERNATING 25 

249 TRACKS 25 
|50 ETC 

252 2 (ODD) HIGH FREQUENCY ALTERNATING 52 

253 TRACKS 52 

254 ETC 
255 

256 3 (EVEN) HALF FREQUENCY OUTSIDE TRACK 77 

257 HIGH FREQUENCY INSIDE TRACKS 76 

ill V, 

262 3 (ODD) HIGH FREQUENCY OUTSIDE TRACK 01 

263 HALF FREQUENCY INSIDE TRACKS 77 

264 01 

265 77 

266 ETC 
267 
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268 
269 
270 

272 PATTERN DESCRIPTION DATA 

274 4 (EVEN) INCREMENTING PATTERN 01 

275 (NO ALL O'S) 02 

276 03 
277 

278 ^7 

279 77 
280 

281 A (ODD) INCREMENTING PATTERN 00 

282 (INCLUDING ALL O'S) 01 

283 02 
284 

285 

286 ._ 

287 77 
288 

289 5 (EVEN) THREE O'S EACH TRACK EVERY 37 

290 6TH WORD 37 

291 37 

292 57 

293 57 

294 57 

295 67 

296 67 

297 67 

298 73 

299 73 

300 73 

301 75 

302 75 

303 75 

304 76 

305 76 

306 76 

307 ETC 
308 

309 5 (ODD) THREE 1'S EACH TRACK EVERY «0 

310 6TH WORD 40 

311 ^ 

312 20 

313 20 
3U 20 

315 0 

316 0 

317 10 

318 04 

319 04 

320 04 

321 02 

322 02 

323 02 
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01 
01 
01 
ETC 



6 (ODD. even; ALL 1'S 

7 (EVEN) RANDON (NO ALL O'S) 

7 (ODD) RANDOM (INCLUDING ALL O'S) 
4.3.2.3 PARITY 

PARITY SELECTION IS EITHER EVEN OR ODD. 



77 
77 
ETC 

■7 



PAR 

0 



DESCRIPTION 
EVEN PARITY. 



1 ODD PARITY 
4.3.2.4 DENSITY 

THERE ARE 4 TYPES OF DENSITIES FOR SELECTION (2,5.3,C) 
DEN DESCRIPTION 

2 200 BITS PER INCH. 
5 556 BITS PER INCH. 
8 800 BITS PER INCH. 
C 800 6PI CORE DlflP. 



4.3.2.5 RECORD LENGTH SEQUENCE 

THERE ARE 4 TYPES OF RECORD LENGTH SEQUENCES FOR SELECTION (0 THRU 3) 
RLS DESCRIPTION 

0 MINIMUM LENGTH RECORDS (4 BYTES) 

1 MAXIMUM LENGTH RECORDS (1024 BYTES) 

2 VARING LENGTH RECORDS. MINIMUM TO MAXIMLfl (1ST RECORD= 
4 BYTES. EACH SUCCESSIVE RECORD IS 4 BYTES LONGER 
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UNTIL 256TH REC0RD=1024 BYTES) 

3 VARYING LENGTH RECORDS. MAXIMUW TO MINIMUM (1ST RECORD- 

1024 BYTES, EACH SUCCESSIVE RECORD IS 4 BYTES SHORTER 
UNTIL 256TH REC0RD=4 BYTES) 

4.3.2.6 WRITE START/STOP HOOE 

THERE ARE 3 TYPES OF WRITE MODES FOR SELECTION (0 THRU 2) 
UMO DESCRIPTION 

0 NONSTOP - NO WAITING BETWEEN WRITE OPERATIONS. NEW 

COMMAND IS ISSUED WHEN CU READY SETS. 

1 START/STOP - FULL STOP BETWEEN WRITE OPERATIONS. NEW 

COMMAND IS ISSUED WHEN TU READY SETS. 

2 RANDOM - FULL STOP WITH RANDOM DELAY (1-256 MILLISECONDS) 



SEO 0008 



4.3.2.7 READ START/STOP MODE 

THERE ARE 3 TYPES OF MODES FOR SELECTION (0 THRU 2) 



RMO 

0 

1 

2 



DESCRIPTION 



NONSTOP - NO WAITING BETWEEN READ OPERATIONS. 

COMMAND IS ISSUED WHEN CU READY SETS. 

START/STOP - FULL STOP BETWEEN READ OPERATIONS. 
COMMAND IS ISSUED WHEN TU READY SETS. 



NEW 
NEW 

RANDOI - FULL STOP WITH RANDOM DELAY (1-256 MILLISECONDS) 



4.3.2.8 FINAL TEST SELECT APPROVAL 

AFTER SELECTING RMO, IF ALL PARAMETERS SELECTED ARE LEGAL^JK" 
WILL BE PRINTED. IF THE PARAMETERS SELECTED STILL CORRESPOND 
TO THE OPERAtSs INTENTIONS HE MUST TYPE A CARRIAGE RETURN 
TO SAVE THE PArShETeS. TYPING ANY OTHER KEY NOW, OR IN FACT 
AT ANY TImI DURING PARAMETER SELECTION TYPING AN ILLEGAL KEY 
WILL DSUSE THE PRESeStMRAMETERS TO BE DELETED AND A NEW 
PARAMETER SELECTION TO 8E INITIATED. UP TO TEN SETS OF 
PArScTER SELECTIONS can be MADE. EACH SET WILL BE EXECUTED 
AFTER THE PREVIOUSSET^ACHES END OF TAPE. TO TERMINATE 
PARAMETER SELECTION A SECOND CARRIAGE RETURN MUST BE TYPED AFTER 
SELECTING A SET OF PARAMETERS. 

4.3.2.9 TEST SELECTION EXAMPLES 

TST PAT PAR DEN RLS UMO RMO 
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TWO PARAMETERS SETS WERE SELECTED BY THE ABOVE SEQUENCE 

TEST3, PATTERN 2, EVEN PARITY, 200 BPI. MAXI»»U1 RECORD LENGTH, 
WRITE NONSTOP, AND READ NONSTOP. 

TEST 0, PATTERN 1, ODD PARITY. 800 8PI, VARYING RECORD LENGTH 
(WIN TO HAX), WRITE START/STOP, READ NONSTOP. 
(NOTE: EVEN THOUGH TEST 0 IS A yRlTE ONLY TEST, ALL PARAI1ETERS 
nUST BE SATISFIED.) (IN THIS CASE RMO HAS NO EFFECT) 



IN THE SECOND PARAMETER SET A 'V 
AND THE SET WAS REINITIALIZED. 



WAS TYPED WHICH WAS ILLEGAL 



IN THE THIRD PARAMETER SET AN 'V WAS TYPED INSTEAD OF A CAR- 
RIAGE RETURN AND THE PARAMETERS WERE IGNORED. AFTER AT LEAST 
ONE GOOD SET WAS SELECTED A CARRIAGE RETURN WAS TYPED AT THE 
BEGIfMING OF THE PARAMETER SELECTION AND THE PROGRAM WOULD START 
TESTING. 



4.3.2.10 AUTOMATIC PARAMETER SELECTION 

STARTING AT 200 WILL CAUSE THE FOLLOWING TEST PARAMETERS 
TO BE SELECTED AUTOMATICALLY ; 

TST PAT PAR DEN RLS UMO RMO 

3 6 0 8 1 1 1 

4 0 1 C 2 2 2 
2 7 y C 2 2 2 



5.0 OPERATING PROCEDURE 

THIS PROGRAM HAS BEEN MODIFIED TO RUN ON A PROCESSOR WITH OR WITHOUT 
A HARDWARE SWITCH REGISTER. WHEN FIRST EXECUTED THE PROGRAM TESTS 
THE EXISTENCE OF A HARDWARE SWITCH REGISTER. IF NOT FOUM) A 
SOFTWARE SWITCH REGISTER LOCATION (SWRE6=L0C. 176 ) IS DEFAULTLD TO. 
IF THIS IS THE CASE, UPON EXECUTION THE CONTENTS OF THE SWREG ARE 
Olff>EO IN OCTAL ON THE CONSOLE TTY AM) ANY CHANGES ARE RE<JUESTED 

(IE) SWR=XXXXXX NEW= 

POSSIBLE RESPONSES ARE: 
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1. 

2. 



<CR> 

6 DIGITS 0-7 
<LF> 



IF NO CHANGES ARE TO BE MADE 

TO REPRESENT IN OCTAL THE NEW SWITCH REGISTER 

VALUE ;LAST DIGIT FOLLOWED BY <CR>. 

TO ALLOW REENTERING VALUE IF ERROR IS COWITTED 

KEYING IN SWREG VALUE. 

ONLY VALID FOR ACT-11 SYSTEMS-DO NOT USE 



BUILT INTO THE PROGRAM IS THE ABILITY TO DYNAMICALLY CHANGE THE 
CONTENTS OF SUREG DURING PROGRAM EXECUTION. BY STRIKING ^ ^ 
(CNTL G) ON CONSOLE TTY THE OPERATOR SETS A REQUEST fLAG TO CHANGE 
THE CONTENTS OF SWREG, WHICH IS PROCESSED IN KEY AREAS OF THE PROGRAM 
CODE (IE) ERROR ROUTINES, AFTER HALTS END OF PASS, AND OTHER 
APPLICABLE AREAS. 



OPERATIONAL SWITCH SETTINGS 

THE OPERATIONAL SWITCH SETTINGS ARE USED TO: 

A. ALTER ERROR RECOVERY PROCEDURES 

B. DELETE ERROR PRINTOUTS 

C. CAUSE A TEST SEQUENCE TO BE REPEATED WITH A VARIATION 

THE PATTERN, RECORD LENGTH SEQUENCE, WRITE MODE, OR READ MODE 



5.1.1 SWITCHES TO ALTER ERROR RECOVERY 

THE FUNCTION PERFORMED IS WITH THE SWITCH IN THE 'T' (OR UP) 
POSITION. 



SW FUNCTION 

4 DELETE READ RE-TRYS 



DELETE WRITE XIRG 



WRITE STATISTICAL 
RECOVERY 



PURPOSE 

USE OF THIS SWITCH WILL CAUSE 
DELETION OF THE NORMAL SEQUENCE 
OF TRYING TO REH^ A RECORD 
AFTER A READ ERROR. THIS WOULD 
BE USEFUL FOR SCOPING READ 
OPERATIONS. 

USE OF THIS SWITCH WILL CAUSE 
RECORDS WITH WRITE ERRORS TO 
BE LEFT ON TAPE. THE READ PASS 
WITH DATA TYPEOUTS SELECTED 
WOULD BE USEFUL FOR DETERMINING 
WRITE ERROR ORIGINS. 

USE OF THIS SWITCH WILL CAUSE 
A BACKSPACE 2 RECORDS, SPACE 
FORWARD 1 RECORD, REWRITE RECORD 
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SEQUENCE TO BE USED INSTEAD 
OF yRITE XIRG SO THAT THE RECORD 
WILL BE REWRITTEN ON APPROXI- 
MATELY THE SAME AREA Of TAPE 
yHERE THE URITE ERROR OCCURRED. 
THIS METHOD KEEPS THE INTER- 
RECORD GAP FROM GETTING LARGER. 
DATA IS yRITTEN OVER THE SAME 
SPOT ON TAPE TO TRY AND f IND BAD TAPE. 



5.1.2 SWITCHES TO CONTROL ERROR PRINTOUTS 

THE FUNCTION PERFORMED IS WITH THE SWITCH IN THE 'T' (OR 
UP) POSITION. 



SU 

13 



FUNCTION 

SUPPRESS ERROR 
PRINTOUT 



PRINT ERROR STATISTICS 



5.1.3 TO ALTER TEST PATTERNS 
SU FUNCTION 
0 CHANGE PATTERN 



PURPOSE 

THE STATISTICS CONCERNING THE 
NUMBER /MD TYPES OF ERRORS WILL 
BE PRINTED WHEN THE TAPE UNIT 
REACHES END OF TAPE. FOR LONG 
PERIODS OF TESTING (OVERNIGHT, ETC) 
IT MAY BE SUFFICIENT TO RECEIVE 
THIS INFORMATION AND NOT HAVE A 
TYPEOUT EACH TIME AN ERROR OCCURRED. 

AFTER COMPLETION OF EVERY RECORD 
LENGTH SEQUENCE INSTEAD OF AFTER 
END OF TAPE AS IS NORMAL. 



PURPOSE 

AFTER COMPLETION OF A TEST SE- 
QUENCE REPEAT WITH NEXT PATTERN. 
UNTIL PATTERN 7 IS COMPLETED. 



THIS FEATURE IS USEFUL FOR TESTING MANY COMBINATIONS OF TEST 
PATTERNS WITHOUT REQUIRING THE OPERATOR TO TYPE IN A LARGE 
NLMBER OF PARAMETERS. 

EXAMPLE: TST PAT PAR DEN RLS \JV) RMO 

3 2 0 2 1 0 0 

4 6 0 2 0 0 0 

WITH SW0=1 

TEST 3 WILL BE EXECUTED 6 TIMES (PATTbRNS 2-7) 

AND THEN TEST 4 WILL BE EXECUTED 2 TIMES (PATTERNS 6,7) 
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6. ERRORS 

6.1 WRITE ERRORS 

THE FOLLOWING ERROR TYPEOUTS ARE POSSIBLE DURING A WRITE 
OPERATION. 

A. WRITE STATUS ERROR 

CO«D STATUS RECORD LENGTH EXPECTED ACTUAL 

xxxxxx xxxxxx 

THIS WILL OCCUR IF ERROR (BIT 15 OF COTftANO REGISTER) SETS 
ON A WRITE COmAND. THE CONTENTS OF THE COMPIAND AND STATUS 
REGISTERS IS PRINTED ALONG WITH THE RECORD MfCER AND RECORD 
LENGTH. 

B. XIRG WRITTEN 4 TIMES 

THIS WILL OCCUR IF A WRITE STATUS ERROR CAM«)T BE ELIMIN- 
ATED IN 4 ATTEMPTS AT REHJRITING THE RECORD WITH EXTEM>ED 
INTERRECORD GAP. NOT POSSIBLE DURING TEST 0 OR 1 AS THESE 
ARE 'VRITE ONLY" TESTS AND IT IS NOT ABSOLUTELY NECESSARY 
FOR THE RECORDS TO BE WRITTEN PROPERLY. SETTING SWITCH 
5 TO A 'V WILL DELETE 'WllTE WITH XIRG". 

C. END OF TAPE 

DRV PAT PAR DEN MODE RECORD LENGTH 
0 7 0 800 SSTP 1276 MAX 

WRITE ERRORS ' 5 
RECOVERED AT 1 = 3 
RECOVERED AT 3 = 1 
PERPMNENT BADSPOT = 1 

DRV = UNIT NUMBER 
PAT = PATTERN NUMBER 
PAR = PARITY 
DEN = DENSITY 

MODE = WRITE START/STOP MODE 
RECORD » NUmER OF RECORDS 
LENGTH ' LENGTH OF RECORDS 

ON INIT 0, USING PATTERN 7, EVEN PARITY, 800 8PI, WRITE 
MODE START/STOP, 1276 RECORDS OF MAXIMlfl (1048 BYTES) LENGTH 
WERE WRITTEN. DURING THAT TIME 5 WRITE STATUS ERRORS 
OCCURRED, 3 WERE RECOVERED ON THE 1ST RE-WRITE, 1 RECOVERED 
ON THE 3RD RE-URITE. THE REMAINING ERROR NOT RECOVERED IS 
CONSIDERED TO BE CAUSED BY A PERMANENT BAD SPOT ON TAPE. 



czT«cDO rmi data reliab 
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660 

661 

662 

663 

664 

66S 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 

681 

682 

683 

684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

694 

695 

696 

697 

698 

699 

700 

701 

702 

703 

704 

705 

706 

707 

708 

709 

710 

711 

712 

713 

714 

715 
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6.2 



READ ERRORS 

THE FOLLOWING ERROR TYPEOUTS ARE POSSIBLE DURING A READ 
OPERATION: 

A. READ STATUS ERROR 

COnD STATUS RECORD LENGTH EXPECTED ACTUAL 
XXXXXX XXXXXX 47 4 

THIS WILL OCCUR WHEN ERROR (SIT 15 OF COMMAND REGISTER) 
SETS DURING A READ OPERATION. THE CONTENTS OF THE COWAND 
AND STATUS REGISTERS IS PRINTED ALONG WITH THE RECORD NLPBER 
AND RECORD LENGTH. 



8. READ DATA ERROR 



cono 

XXXXXX 



STATUS 
XXXXXX 



RECORD LENGTH EXPECTED ACTUAL 
107 1024 mm 175777 



6.3 
6.3.1 



THIS WILL OCCUR WHEN THE DATA READ DOES NOT AGREE WITH THE 
DATA URITTEN. THE CONTENTS OF THE COMMAND AND STATUS REGISTERS 
IS PRINTED, ALONG WITH THE RECORD MfBER MO RECORD LENGTH. 
ALSO PRINTED IS TKE CONTENTS OF THE MEMORY ADDRESS FROM 
WHICH THE DATA WAS URITTEN (EXPECTED) AND THE CONTENTS OF THE 
MEMORY ADDRESS INTO WHICH IT WAS READ (ACTUAL). THIS INDI- 
CATES THE FIRST DATA TRANSFER ERROR FOUM) FOR THE RECORD. 
NO ATTEMPT IS MADE TO DETERMINE IF THERE ARE OTHER DATA ERRORS 
IN THE RECORD. 

C. READ PASS 

END OF TAPE 

DRV PAT PAR DEN MODE RECORD LENGTH 

3 4 1 CD NSTP 1276 M-WAX 

READ STATUS ERRORS = 3 

DATA ERRORS - 1 

NON RECOVERABLE ERRORS - 0 

ON iMIT 3< USING PATTERN 4, ODD PARITY, CORE DUMP. READ MODE 
NONSTOP, 1276 RECORDS OF VARYING LENGTH (4 TO 1024) WERE 
READ. DURING THAT TIME 2 READ STATUS ERRORS AND 1 DATA 
ERROR OCCURRED. THERE WERE 0 NON-RE COVERABLF ERRORS WHICH 
INDICATES THAT THE STATUS AND DATA ERRORS WL«<£ ELIMINATED BY 
RE-READING THE RECORD UP TO THREE TIMES. 



ERROR RECOVERY PROCEDURES 
WRITE ERROR RECOVERY 



CZTMCDO imi DATA RELIAB 
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716 

717 

718 

719 

720 

721 

722 

723 

72A 

725 

726 

727 

728 

729 

730 

731 

732 

733 

jy* 

735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 
769 
770 
771 
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THE PROCEDURE TO RECOVER FROM A WRITE Efct.'^ IS DETERMINED BY 
THE FOLLOWING: 

A. IS IT A 'VWITE ONLY" TEST OR WILL THE DATA BE READ? 

B. IS 'URITE STATISTICAL RECOVERY" SELECTED (SW 6*1)? 

C. IS 'DELETE WRITE WITH XIRG" SELECTED (SW 5*1)? 

6.3.1.1 IF IT IS A '\«ITE ONLY" TEST AND 'URITE STATISTICAL RECOVERY" 
IS NOT SELECTED (SW 6=0) THE WRITE ERROR IS SIMPLY COUNTED 
AND THE PROGRAM PROCEEDS TO THE NEXT RECORD. 

6.3.1.2 IF IT IS A 'MHIM ONLY" TEST AND 'VRITE STATISTICAL 

RECOVERY" IS SELECTED (SW 6^1) < A URITE ERROR IS COUNTED AND THEN 
A RECOVERY SEQUENCE (BACKSPACE 2 RECORDS. SPACE FORWARD 1 RECORD, 
REWRITE RECORD) IS ENTERED. THIS RECOVERY SEOUENCE WILL BE 
REPEATED UP TO 7 TIMES IF THE WRJTF ERROR PERSISTS. IF A 
WRITE ERROR IS NOT ELIMINATED AFTER THE 8TH ATTEMPT IT IS 
COUNTED AS A PERMANENT BAD SPOT ON TAPE. STATISTICS ARE SAVED 
TO INDICATE HOW MANY TIMES THE REWRITE SEQUENCE HAD TO BE RE- 
PEATED TO RECOVER FROM EACH WRITE ERROR. 

6.3.1.3 IF IT IS A '1JRITE AND READ" TEST AND 'VRITE STATISTICAL RECOVERY" 
IS SELECTED (SW 6«1> AND 'WlITE WITH XIRG" IS NOT DELETED (SW 5=0) 
THE PROGR/W WILL FIRST ATTEMPT TO 00 A 'IJRITE STATISTICAL RECOVERY". 
IF A PERMVCNT BAD SPOT IS ENCOINTERED THE PWOVm WIU THEN 
ATTEMPT TO RECOVER WITH A 'VRITE WITH XIRG". FAILURE TO RECOVER 

AT THIS POINT SHOULD RESULT IN A READ ERROR DURING THE READ PASS. 

6.3.1.4 IF IT IS A 'VRITE AND READ" TEST AM) 'VRITE STATISTICAL RECOVERY" 
IS NOT SELECTED (SW 6=0) AM) 'VRITE WITH XIRG" IS NOT DELETED 
(SW 5=0) THE PROGRM WILL TRY TO RECOVER ONLY BY REWRITING THE 
RECORD WITH EXTEM>ED INTERRECORD GAP. FAILURE TO RECOVER SHOULD 
RESULT IN A READ ERROR DURING READ PASS. 

6.3.2 READ ERROR RECOVERY 

A READ ERROR CAN OCCUR FOR TWO REASONS: STATUS ERROR OR DATA 
ERROR. A PROPER COUNT IS TAKEN FOR EACH TYPE OF ERROR. RECOVERY 
OF A READ ERROR WILL CONSIST OF TRYING TO RE-READ THE RECORD 
TO TWO MORE TIMES (UNLESS SW 4=1 TO DELETE READ RE-TRYS FOR 
SCOPING PURPOSES). IF THE ERROR PERSISTS IT IS CONSIDERED 'MON- 
RECOVERABLE" AND THE PROGRAM WILL CONTINUE WITH THE NEXT RECORD. 

7. RESTRICTIONS 

NONE 



MISCELLANEOUS 



C2TMCD0 TM11 DATA RELIAB 
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772 
773 
77A 
775 
776 
777 
778 
779 
780 
781 
782 
783 
784 
785 
786 
787 
788 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
801 
802 
803 
804 
805 
806 
807 
808 
809 
810 
811 
812 
813 
814 
815 
816 
817 
818 
819 
820 
821 
822 
823 
824 
825 
826 
827 
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8.1 TAPE LENGTH 

SINCE EACH OF THE TESTS DEPEND ON REACHING THE 'TEOT" REFLECTOR 
FOR TErSiNATING IT COULD BE ADVANTAGEOUS TO USE A "SHORT" TAPE. 
tSuS WoKdALLO^ FOR LESS TI»« TO RUN A SERIES OF TESTS UHILE 
vKyINGTHE TEST PARAMETERS (REFERENCE 5.1.3)., HOWEVER, THIS 
IS NOT INTENDED TO im.i THAT CONSTANTLY CHANGING THE TEST 
PArSeTERS CONSTITUTES A MORE DIFFICULT TEST OF DATA RELIABILITY. 
THELEN6TH OF TIME UNDER TEST IS MORE LIKELY TO SUPPLY THAT.^^.. 
N ANY EVENT, IF A "SHORT" TAPE IS DESIRED, JUST PLACE AH |0T 
REFLECTIVE sfRlP APPROXIMATELY 56 fEET DOWN TAPE FROM THE 'BOT" 
MARKER SO THAT THE TAPE IS STILL USEFUL AS A '1.0N6^' TAPE 
ANOTHER -BOT" MARKER COULD BE PUCED A SHORT DISTANCE (APPROX- 
iKtELY 10 FEET) FARTHER DOWN ON TAPE. THIS WOULD EFFECTIVELY 
GIVE YOU TWO TAPES. CARE MUST BE EXERCISED WHEN MOUNTING THE TAPE 
TO roSniON IT AT THE PROPER "BOT" MW«ER. 

8.2 MEMORY AVAILABLE 

THE PROGR/W REQUIRES 4K OF MEMORY. IF 8K IS AVAILABLE, 
STArTSwTW PROG^ AT ADDRESS 200 OR 210 WILL EXPAND THE »*IT£ 
AND ReJS buffers SO THAT MINIMUM LENGTH RECORDS WILL BE 
8BYTES AND MAXIMUM LENGTH RECORDS WILL BE 2048 BYTES. 

9. PROGR/W DESCRIPTION 

9.1 GENERAL DESCRIPTION 

THE PROOVVI IS DESIGNED AROUND TWO MAIN SUBROUTINES '\dRITE" AND 
•SIa?^^A SERIES Of MINOR SUBROUTINES FWPMNJP^^ 
SELECTION, H^WPLING ERROR STATISTICS, ^,'«COTO roSITIONING. 
IF MORE TiWi ONE UNIT IS SELECTED TH| "WT WITH THE LO^ST 
tATBER IS SELECTED FIRST AND WH^ THE SEQUENCE IS COMPLETED 
THEN THE NEXT LOWEST UNIT NUMBER IS SELECTED UNTIL ALL IMITS HAVE 
BEEN SELECTED. THIS SoCESSlS REPEATED UNTIL ALL WITS REACH 
END OF TAPE. 

9.2 TEST 0 

THIS IS A *\«IITE ONLY" TEST. THE PROCEDURE IS TO WRITE 1 RECORD, 
REPEAT FOR ALL UNITS. CONTINUE UNTIL EOT. WRITE MODE OF NONSTOP 
<wSoJo) SlL NOT BE AN EFFECTIVE SELECTION FOR THIS TEST BECAUSE 
THEWRITE ROUTINE IS MITW AFTER EACH RE COTO TO DE^^j^ 
ANY OTHER UNITS ARE SELECTED. READ MODE <RMO) HAS NO EFFECT ON 
THIS TEST. 

9.3 TEST 1 

THIS IS A 'WRITE ONLY" TEST SIMILAR TO TEST 0 EXCEPT A SEQlCNCE 
OF 256 RECORDS IS WRITTEN ON EACH UNIT BEFORE CHANGING TO THE 
NEXT UNIT. READ MODE (RMO> HAS NO EFFECT ON THIS TEST. 



CZTMCDO TM11 DATA RELIAB 
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828 




9.4 


829 






850 






831 






832 






833 






834 




9.5 


835 




836 






837 






838 






839 






84C 






841 






842 






843 




9.6 


844 






845 






846 






847 






848 






849 






850 




9.7 


851 






852 






853 






854 






855 






856 






857 






858 






859 






860 






861 




10. 


862 






863 






864 






865 






866 






867 






868 






869 






870 






871 




15 


872 






873 




14 


874 




13 


875 




12 


876 






877 




11 


878 




10 


879 




9 


880 






881 




8 


882 




7 


883 




6 
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SEQ 0016 



THIS IS A 'VJRITE AND READ" TEST. THE PROCEDURE IS TO WRITE 256 
RECORDS ON EACH UNIT, THEN BACKSPACE 256 RECORDS ON EACH UNIT, 
THEN READ 256 RECORDS ON EACH UNIT, AND THEN REPEAT THE SEQUENCE 
UNTIL ALL UNITS ARE AT EOT. 

TEST 3 

THIS IS A 'V»RITE AND READ" TEST. THE PROCEDURE IS TO WRITE 1 
RECORD, BACKSPACE, READ 1 RECORD AND REPEAT FOR EACH UNIT, THEN 
REPEAT THE SEQUENCE UNTIL ALL UNITS ARE AT EOT. WRITE MODE OR 
READ MODE OF NONSTOP (1#W=0 OR RMO=0) WILL NOT BE EFFECTIVE 
FOR THIS TEST. 

TEST 4 

THIS IS A 'VJRITE AND READ" TEST. IT IS SIMILAR TO TEST 2 EXCEPT 
UNITS ARE CHANGED BETWEEN EACH RECORD DURING WRITE, BACKSPACE, 
AND READ. WRITE MODE OR READ MODE OF NONSTOP (t*10=0 OR RMO=0) 
WILL NOT BE EFFECTIVE FOR THIS TEST. 

TEST 5 

THIS IS A 'READ ONLY" TEST. THE PROCEDURE IS TO READ 1 RECORD, 
REPEAT FOR ALL UNITS, AND CONTINUE UNTIL ALL UNITS ARE AT EOT. 
THE MAIN PURPOSE OF THIS TEST IS TO PROVE CGHPATJBJLITY AMONG 
TAPE UNITS. A TAPE THAT IS WRITTEN ON ONE UNIT SHOULD BE ABLE 
TO BE READ ON ANY OTHER UNIT. TEST PARAMETERS THAT SELECT 
PATTERN AND RECORD LENGTH SEQUENCE MUST BE THE SAME AS THOSE USED 
TO WRITE THE DATA ON TAPE. ANY OF THE OTHER TESTS (0 THRU 4) 
CAN BE USED TO GENERATE THE DATA. 

LISTING 



STATUS AND COMMAND REGISTER BIT ASSIGTfCNTS 
COMMAND REGISTER 



ERROR 

DEN 8 
DEN 5 

POh€R CLEAR 
PARITY 

UNIT SEL. BIT 2 
UNIT SEL. BIT 1 



00 = 200 BPI 7 TRACK 

01 = 556 BPI 7 TRACK 



0 = ODD 1 - EVEN 



10 = 800 BPI 7 TRACK 

11 = 800 BPI 9 TRACK 



UNIT SEL. BIT 0 
CONTROL UNIT READY 
INTERRUPT ENABLE 



CZTMCDO TM11 DATA RELIAB 
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884 
885 
886 
887 
888 
889 
890 
891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 

937 000000 

938 000001 

939 000002 
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5 
4 
3 

2 
1 
0 



15 

14 
13 
12 

11 
10 
9 

8 

7 
6 

5 
4 
3 

2 
1 
0 



ADDRESS BIT 17 
ADDRESS BIT 16 
FUNCTION BIT 2 

FUNCTION BIT 1 
FUNCTION BIT 0 
GO 



000 
001 
010 
Oil 



OFF LINE 
READ 
WRITE 
WRITE EOF 



100 = SPACE FORWARD 

101 = SPACE REVERSE 

110 = WRITE XIRG 

111 = REWIND 



STATUS REGISTER 



ILLEGAL COrWAND (ILC) 

END OF FILE (EOF) 

CYCLICAL REDUNDANCY ERROR (CRE) 

PARITY ERROR (PAE) 

BUS GRANT LATE (BGL) 

END OF TAPE (EOT) 

RECORD LENGTH ERROR (RLE) 

BAD TAPE ERROR (BTE) 

NON EXISTENT HEMORY (NXM) 

SELECT REMOTE (SELR) 

OF TAPE (BOT) 
7 CHANNEL (7CH) 
SETTLE OOIM (SDM) 

WRITE LOCK (WRL) 
REWIND STATUS (RWS) 
TAPE UNIT READY (TUR) 



COPYRIGnf 19%,1980 DIGITAl'-EQUIPMENT CORP., HAYNARD. MASS. 01754 
REVISED SEPT 1$71, J.RODENHISER 
REVISED AUGUST 1972, JW UCEY 
REVISED FES 1976.R0N PUTUKIS 

''''''' •^l^V'^'l'^Uf^y A.TER AUTOST ^OR SWITCHLESS PROC. 
•; CH602 - INSERTED END OF PASS STATEMENT. 



.NOTE: THIS PROGRAM HAS BEEN MODIFIED TO WORK WITH OR WITHOUT 
A HARDWARE SWITCH REGISTER 



RO=XO 
R1=X1 
R2=X2 
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%0 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 

951 000034 
952 

953 000046 
954 

955 000052 

956 

957 

958 

959 

960 

961 

962 000174 

963 000176 
964 

965 

966 000200 

967 000204 

968 000210 
969 

970 
971 

972 000500 

973 000502 

974 000504 

975 000506 

976 000510 

977 000512 

978 000514 

979 000516 

980 000520 

981 000522 

982 000524 

983 000526 
914 000530 

985 000532 

986 000534 

987 000536 
988 

989 
990 

991 000540 

992 000542 

993 000544 

994 000546 

995 000550 



000003 
000004 
000005 
000006 
000007 



000000 
000034 
012426 
000046 
003310 
000052 
040000 



000174 
000000 
000000 

000200 

000167 001 ■•62 

000167 001612 

000167 001632 



000500 
172520 
172522 
172524 
172526 
177776 
177570 
177570 
177560 
177562 
177564 
177566 
002000 
000004 
014004 
016004 
000224 
000500 



000000 
000000 
000000 

000000 
000000 
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R3=X3 
R4=Z4 
R5=J:5 
SP=X6 
PQ-X7 
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SEQ 0018 



.-TRAP CATCHER IN UNUSED LOCATIONS 0-476 



.ENABL 

.=0 

.=34 

TRAP34 

.=46 

ENDADR 

.=52 

40000 



ABS 



.•SOFTWARE SWITCH REGISTER LOCATION 
• •*****•**••••**•*•***••••••*•••• 

:=i74 

DISPREGrO 
SWRE6: 0 



.=200 

J«P AUTOS T 

J«P HEM4K 

J«P MEM8K 



MTS: 
«TC: 
BC: 
CA 
CC 
SWR 

DISPLAY: 177570 



.=500 
172520 
m522 
172524 
172526 
177776 
177570 



TKS: 
TKB: 
TPS: 
TP8: 
nAXLEN: 
niNLEN: 
WBUf : 
R8Uf : 
MTV: 



177560 
177562 
177564 
177566 
1024. 
4. 

BUFFER 

BUFFER+1024. 

224 



MAX RECORD LENGTH 

MIN RECORD LENGTH 

STARTING ADDRESS OF WRITE BUFFER 

STARTING ADDRESS OF READ BUFFER 



STACK=500 

.TEMPORARY STORAGE AREAS 

TIB: 0 

TEMPST: 0 

COUNT: 0 

RDSW: 0 

ATST: 0 



.ZTMCDO mil DATA RELiAB 
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000552 


000000 




0 




000554 


000000 


CTDl FM- 


w 


OQfi 
WO 


000556 


000000 


1 FMRTU • 
LCivv 1 n ■ 


n 


OQQ 


000560 


000000 




0 


1 uw 


000562 


000000 


cv/pcrp . 


0 


1 UU 1 


000564 


000000 


rnMAMT) ■ 


n 

V/ 




000566 


000000 


K, vf\ VD 1 « 


0 

V 


1 rw^T 


000570 


000000 




0 

V 


1 fW. 


000572 


000000 




0 


1 UUj 


000574 


000000 




0 


1 nrwL 
1 UUO 


000576 


000000 




0 


1 UUf 


000600 


000000 




0 


1 ruSfi 
1 uuo 


000602 


000000 




0 


1 1Y>Q 


000604 


000000 




0 


1 mft 


000606 


000000 




0 


1 U 1 1 


000610 


000000 




0 


1 U 1 c 


000612 


000000 




0 




000614 


000000 




0 

V 




000616 


000000 




0 


1 U 1 J 


000620 


000000 




0 


1 U 1 o 










mi 7 


000622 


000000 




0 


1 u lo 


000624 


000000 




0 

w 


1 U 1 ▼ 


000626 


000000 




0 


1 Ucu 


000630 


000000 




0 


1 UC 1 


000632 


000000 




0 




000634 


000000 




0 


1 \JC-J 


000636 


000000 


NRREAD: 


0 




000640 


000000 


URTl FN* 


0 


1 V£J 


000642 


000000 


RFADLN* 


0 


1 \JcO 


000644 


000000 




0 












1 Uco 








DOTAfi 




000646 


000666 






000650 


000732 




D1 TAB 




000652 


000776 




D2rAfi 




000654 


001042 




D3rAa 




000656 


001106 




D4TAB 




000660 


001152 




DSTAA 




000662 


001216 




1/ V • 




000664 


001262 




D7TAn 


ir\X7 












000666 


000000 




Q 






000732 




=D0TAS'f44 




000732 


000000 


ni TAR- 


0 


1 U«» 1 




000776 




=D1 TAfi'f44 




000776 


000000 


OPTAR ' 

vc • - 


0 






001042 




=D?TAS'f44 




001042 


000000 


D^TAR* 

VJ 1 • 


0 






001106 








001106 


000000 




0 


1047 




001152 




.=D4TAB«44 


1048 


001152 


000000 


D5TA8: 


0 


1049 




001216 




.=D5TAB*44 


1050 


001216 


000000 


D6TAB: 


0 


1051 




001262 




.=D6TAB*44 
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1052 

1053 

105A 

1055 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 

1061 

1082 

1083 

1084 

1085 

1086 

1087 

1088 

1069 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 

1101 

1102 

1103 

1104 

1105 

1106 

1107 



001262 

001326 
001330 
001332 
001334 
001336 

001340 
001342 
001344 
001346 
001350 
001352 
001354 
001356 
001360 
001362 
001364 



001534 
001542 
001550 
001554 
001560 
001564 
001570 
001572 



000000 
001326 
000000 
000000 
000000 
000000 
000000 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
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.=D7TAeH4 

CHARIN: 0 

NLMTST: 0 

PARAW: 0 

TSTEX: 0 

TEST: 0 
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SEQ 00. 



TSTT8L; 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



CHARACTER JUST INPUT 
NkTBER Of TEST 
TEST PARAMETERS 

POINTS TO TEST PARAMETERS TO BE EXECUTED 
CONTAINS CURRENT TEST NlfBER 

TEST TABLE 

UP TO 10 TESTS CAN BE SELECTED TO 
BE RUN IN CONSECUTIVE ORDLR 



001366 


012706 


000500 




AUTOS T: 


MOV 


001372 


104432 






CH601 : 


SUSW 


001374 


012767 


}77777 


177146 




MOV 


001402 


012767 


036225 


177730 




MOV 


001410 


012767 


040752 


y7772i* 




MOV 


001416 


012767 


027752 


\77720 




MOV 


001424 


012767 


000003 


^77676 




MOV 


001432 


012767 


123456 


005760 




MOV 


001440 


012767 


176543 


005754 




MOV 








.DETERMINE T 


001446 


012737 


001464 


000004 




MOV 


001454 


005767 


022324 






TST 


001460 


000240 








NOP 


001462 


000413 








BR 


001464 


022626 






NXMRET: 


CMP 


001466 


012767 


000004 


177034 




MOV 


001474 


012767 


002000 


177024 




MOV 


001502 


012767 


016004 


177024 




MOV 


001510 


000411 








BR 


001512 


012767 


000010 


177010 


0VER4K: 


MOV 


001520 


012767 


004000 


177000 




MOV 


001526 


012767 


020004 


177000 




MOV 



012737 
012777 
005067 
005067 
012700 
105777 
100033 
016777 



TU.SEL; 



000006 000004 

010000 176732 

176776 

177000 

000200 

176712 



176754 176702 NXT.TU: 



#STACK.SP 

#-1.ATST 
#36225, TSTTBL 
#40752, TSTTBL+2 
#27752,TSTTaL*4 
#3,NUnTST 
#123456,L0NIJM 
#1 76543, HINUH 
SIZE Of THE WRITE A^ 
#N)(MR£T,a#4 
8UFFER>4096. 

0VER4K 

(SP)*,(SP)* 

#4.MJNLEN 

#l624.,nAXLEN 

ieUFFER'^1024.,R8UF 

TU.SEL 

#8.^MINLEN 

#204f'.,nAXLEN 

4eUFFcR«^2G48.,RBUF 



A DRIVE WILL DE TESTED IF: 

1. IT cm BE SELECTED 
IT IS 7 TRACK 

IS WRITE ENABLED 
#6,a»4 



;SEE IF SOFT SU REG NECESSARY 



.-PRIME RANDOM NLMBER GENERATER 

READ BUFFERS. 

.•SETUP NXM VECTOR 
.•OVER 4K OF MEMORY? 

;BR IF YES . 
;POP THE STACK 



;G0 SELCT DRIVES 



2. 

3. IT 
MOV 
MOV 

CLR 

CLR 

MOV 

TST8 

BPL 

MOV 



#i6ooo,aMTc 

DRVSEL 
MSBITS 
#200, RO 
iMTC 

IDSELF 
DRVSEL. aWTC 



.•SET TRAP CATCHER 
•PUR CLR 

•CLEAR DRIVE TABLF 

;RO=DRIVE 0 

;BR IF NO CU RDY 
.•SELECT A DRIVE 



cz 
cz 



MCDO TMII 
MCD.P11 



DATA RELIAB 
03-JUN-80 15:26 



MACYll 30A(1052) 03-JUN-80 15:27 



I 2 
PAGE 



21 



SEO 0021 



108 

109 

110 

111 

112 

113 

1U 

115 

116 

117 

118 

119 

120 

121 

122 

123 

12A 

125 

126 

127 

128 

129 

130 

131 

132 

133 

13A 

135 

136 

137 

138 

139 

HO 

1A1 

U2 

U3 

14A 

145 

146 

U7 

148 

149 

150 

151 

152 

153 

154 

155 

156 

157 

158 

159 

160 

161 

162 

163 



001600 
001604 
001612 
001614 
001616 
001620 
001622 
001630 
001632 
001640 
001642 
001646 
001652 
001654 
001656 



001660 
001664 
001666 
001672 
001674 
001700 
001702 
001706 
001710 



001714 
001720 
001722 
001726 
001732 
001734 



012702 
032777 
001003 
005302 
003372 
000412 
032777 
001406 
032777 
001002 
050067 
105267 
000241 
006000 
001345 



012702 
104404 
016702 
104426 
016702 
104426 
005767 
001002 
000167 



012702 
104404 
105067 
012701 
005000 
012702 



000024 
000100 



000020 

000004 

176712 
176701 



013115 
176636 
176626 
176652 
000160 

013217 

012056 
014004 

000200 



176666 USSTST: 



176650 USS.OK: 



176640 



NO.SEL: 



WOV 

BIT 

BNE 

DEC 

BGT 

BR 

BIT 

BEQ 

BIT 

BNE 

BIS 

INCB 

CLC 

ROR 

BNE 



#20.. R2 
#100,aMTS 

USS.OK 
R2 

USSTST 
NO.SEL 
#20.a«TS 
NO.SEL 

«4,anTs 

NO.SEL 

RO.nSBITS 

DRVSELO 

RO 

NXT.TU 



SETUP R2 FOR WAIT LOOP 
DOES DRIVE EXIST? 
BR IF YES 



DRIVE IS NON-EXISTENCE 

IS THIS DRIVE 7 OR 9 CHN? 

8R IF 9 CHN. 

IS WRITE LOCK ON? 

BR IF YES 

PUT DRIVE INTO T/«LE 
INC. THE DRIVE NUMBER 



IDSELF: MOV 


«nSG10A,R2 


TOP 




MOV 


MINLEN,R2 


DECPRT 




MOV 


n^LEN,R2 


DECPRT 




TST 


nSBITS 


BNE 


.♦6 


JMP 


START1 



HAS ALL DRIVES BEEN TESTED FOR EXISTENCE'' 
BR IF NO 



AND MAX. RECORD LENGTHS. 



.•PRINT MIN. LENGTH 

.-PRINT MAX. LENGTH 

.WAS ANY DRIVES SELECTED? 

*6R IF YES 

■NO—GO HAVE OPERATOR SELECT DRIVES 



.TYPE-OUT THE DRJVE/S TO BE TESTED 



MOV 
TOP 

cue 
nov 

CLR 

nov 

.FORM AND SAVE 



001740 


105021 






cue 


001742 


112721 


000040 




novB 


001746 


030267 


176606 




LOOPER: BIT 


001752 


001405 






BEO 


001754 


110011 






novB 


001756 


152721 


000060 




BISB 


001762 


112721 


000054 




nove 


001766 


000241 






f ZEROS: CLC 


001770 


006002 






ROR 


001772 


005200 






INC 


001774 


020027 


000007 




CMP 


002000 


003762 






BLE 


002002 


105011 






CLRB 


002004 


112741 


000100 




novB 


002010 


012702 


014004 




MOV 


002014 


104404 






TOP 


002016 


000167 


001074 




JMP 










.MODIFY RECa 


002022 


012767 


000004 


176500 


MEM4K: MOV 


002030 


012767 


002000 


176470 


MOV 



inS6108,R2 

BUFFER 

JBUFFER.RI 

RO 

f200,R2 

DRIVE NUMBER 
(RD* 
#• .(RD* 
R2,MSBITS 
SZEROS 
RO.(RI) 
#'0.(R1)* 
#',,(R1)* 

R2 
RO 

R0.#7 

LOOPER 

(R1) 

#'a,-(R1) 
4IBUFFER,R2 



;SET RO TO DRIVE 0 
.-SET R2 TO DRIVE 0 



FOR TYPE-OUT 



SET Eon 
SPACE 

DID THIS DRIVE NUMBER EXIST? 
BR IF NO 

YES—SAVE THE NlfBER 
MAKE IT ASCII 
COMMA 

POSITION DRIVE BIT 

UPDATE DRIVE NLMBER 
LAST 

BR IF NO 
SET EOM 
CR t LF 

TYPE THE DRIVE/S SELECTED 



EXECUT ;G0 START TESTING 

LENGTHS AND BUFFER AREAS FOR 4K. 
«4..MINLEN 
*1024.,MAXLEN 



CZTMCDO TM11 DATA RElIAB 
CZTMCD.P11 03-JUM-80 15:26 



MACYll 30A(1052J 03-JUN-80 



1164 

1165 

1166 

1167 

1168 

1169 

1170 

1171 

1172 

1173 

1174 

1175 

1176 

1177 

1178 

1179 

1180 

1181 

1182 

1183 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

1198 

1199 

1200 

1201 

1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

1216 

1217 

1218 

1219 



002036 
002044 

002046 
002054 
002062 
002070 
002074 
002100 
002102 
002110 
002116 
002122 
002124 
002130 
002132 
002140 
002142 
002146 
002150 
002154 
002156 
002162 
002170 
002172 
002200 
002202 
002206 
002210 
002216 

002220 
002226 
002232 
002236 
002242 
002244 
002246 
002250 
002254 
002256 
002262 
002264 
00227G 
002274 
002276 
002304 



002306 
002312 
002314 
002320 
002324 
002326 



012767 
000411 

012767 
012767 
012767 
005067 
012706 
104432 
012767 
012767 
012702 
104404 
005067 
1 04400 
^ 22767 
001010 
005767 
001752 
005767 
001454 
000167 
^ 22767 
003404 
122767 
003407 
105777 
100375 
012777 
000424 

142767 
105167 
012700 
105267 
001402 
006200 
000773 
130067 
001003 
150067 
000402 
140067 
105777 
100375 
012777 
000711 



012702 
104404 
005067 
012700 
104400 
122767 



016004 176470 



000010 
004000 
020004 
176454 
000500 

123456 
176543 
012513 

176430 

000015 

176412 

176374 

000734 
000070 

000060 

176314 

000077 



000270 
177074 
000200 
177064 



012534 

177010 
001340 

000015 



I764b4 
176444 
1 76444 



005310 
005304 



177166 



;M00JF1 
MEMSK: 



START: 
STARTl 



SELDftV: 



177136 
177126 

176306 
177100 



SELDl 



SELD2: 



MOV 
BR 

RECORD 

nov 

MOV 

MOV 

CLR 

MOV 

SUSU 

MOV 

MOV 

MOV 

TOP 

CLR 

UAITKY 
CMPB 
BNE 
TST 
BEO 
TST 
BEQ 
JMP 
CMPB 
BLE 
CMPB 
BLE 
TSTB 
BPL 
MOV 
BR 



J 2 
15:27 PAGE 22 



,RBUF 



SEO 0022 



*8UFFER*1024. 
START 

LENGTHS AND BUFFER AREAS FOR 8K. 
#8..MINLEN 
#2048.,MAXLEN 
«BUFFER«2048.,RBUF 



ATST 
#STACK. SP 

«1 23456, LONUM 
#176543-HINUW 
«nS61 ,R2 

MS8ITS 

#15,CHARIN 

SELDl 

MSBITS 

STARTl 

ATST 

SELTST 

EXECUT 

#70,CHARIN 

SELD2 

#60,CHARIN 
VALID 
iTPS 
.-4 

/r'?,aTPB 
VAL4 



;HAVE VALID DRIVE .NLHBER 
VALID: 



176304 

176276 

176270 
176226 

000054 176220 



VAL1 



VAL2: 



VAL3: 
VAL4: 



BICB 
COMB 
MOV 
INC6 
BEQ 
ASR 
BR 
BITB 
BNE 
BISB 
BR 
BICB 
TSTB 
BPL 
MOV 
BR 



ir270,CHARIN 
CHARIN 
#200,R0 
CHARIN 
VAL2 
RO 
VAL1 

RO,MSBITS 
VAL3 

RO,MSBITS 
V.AL4 

R0,MS8ITS 

aTPS 

.-4 

#',,8TPB 
SELDRV 



NOT AUTO START 
INITIALIZE STACK 

PRIME RANDOM 
Nl/BER GENERATOR 

PRINT 'SELECT DRIVES' 

CLEAR SELECTED DRIVE INDICATOR 

UAS CHARACTER A CARRIAGE RETURN? 
NO 

YES, UERE ANY DRIVES SELECTED 
NO 

YES NOW SELECT TESTS 



IS CHARACTER 
NO. PRINT "7 
IS CHARACTER 
YES 



A VALID MfCER 0-71 

I 

A VALID MMBER 0-7? 



.•PRINT 



.-MASK OUT MfCER 

.INITIALIZE BIT POSITION FOR DRIVE 0 
.♦1 TO DRIVE SELECT 
.HAVE DRIVE OF EQUAL TO ZERO 
.MOVE BIT POSITION TO NEXT DRIVE 
;TRY AGAIN 

.•COMPARE DRIVE SELECT WITH PREVIOUS SELECTED 
;ORIVE WASN'T PREVIOUSLY SET. SO SET IT NOW. 
.•DRIVE WAS SET, CLEAR IT. 



.•PRINT COMMA 

.•RETURN TO WAIT FOR NEXT KEY 



.-HAVE DRIVES SELECTED-NOW GET TEST SELECTION 
SELTST: MOV «MSG2,R2 

TOP jPRINT' SELECT TESTS' 

CLR NJ^ISJ .-CLEAR TEST NUMBERS SELECTED 

MOV #TSTTBL,RO ; INITIALIZE TEST TABLE POINTER 
SELT1 • WAITKY 

176772 ' CMPB #15. CHARIN .WAS CHARACTER A CARRIAGE RETURN? 



CZTMCDO TMII 
C2TMCD.P11 



DATA RELIAB 
03-JUN-80 15:26 



MACYll 30A(1052) 03-JUN-80 



K 2 
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S£0 0023 



1220 

1221 

1222 

1223 

122A 

1225 

1226 

1227 

1228 

1229 

1230 

1231 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 

1247 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 



002334 
002336 
002342 
002344 
002350 
002356 
002360 
002366 
002370 
002374 
002376 
002400 
002404 
002406 
002410 
002412 
002414 
002416 
002422 

002424 
002426 
002434 
002436 
002444 
002446 
00245? 
002456 
002464 
002470 

002472 
002474 
002502 
002504 
002512 
002514 
002520 



002522 
002524 
002532 
002534 
002542 
002544 
002550 
002552 
002560 
002562 
002566 
002570 
002576 
002600 
002604 



001005 
005767 
001412 
000167 
122767 
003404 
122767 
003404 
012702 
104404 
000752 
016704 
000304 
006104 
006104 
006104 
006104 
042704 
104430 

104400 
122767 
003755 
122767 
002351 
000367 
006167 
042767 
056704 
104430 

104400 
122767 
001406 
122767 
001326 
052704 
104430 



104400 
122767 
001424 
122767 
001003 
052704 
000415 
122767 
001003 
052704 
000406 
122767 
001274 
052704 
104430 



176766 

000546 
000066 

000060 

012506 

176722 



107777 



000070 

000057 

176654 
176650 
170777 
176636 



000060 
000061 
000400 



000062 
000065 
000100 
000070 
000200 
000103 
000300 



176750 
176740 



SELT2: 



SELT3: 



BNE 

TST 

BEQ 

JMP 

CMPe 

BLE 

c«pe 

BLE 

nov 



BR 

SELPAT: MOV 
SWAB 
ROL 
ROL 
ROL 
ROL 
BiC 
SP3 

;HAVE VALID 



SELT2 

NLMTST 

SELT3 

EXECUT 

#66,CHARIN 

SELT3 

#60,CHARIN 

SELPAT 

/mS60,R2 

TOP 

SELT1 

CHARIN,R<« 

R4 

R4 

R4 

R4 

R4 

#107777,R4 



NOW 



176672 
176662 

176642 

176624 
176614 



CMPB 
BLE 
CMPB 
BGE 
SUAB 
ROL 
BIC 
BIS 
SP3 

;UAIT FOR PARITY 
UAITKY 
CMPB 
BEQ 
C«P8 
BNE 
BIS 

SELPR: SP3 



TEST SELECTED, 
WAJTKY 
#70,CHARIN 
SELT3 

#57,CHARIN 
SELT3 
CHARIN 
CHARIN 

#170777,CHARIN 
CHARIN,R4 



WERE ANY TESTS SELECTED? 
NO 

YES, EXECUTE TESTS 

IS CHARACTER A VALID NlfBER 0-5 

NO 

IS CHARACTER A VALID NUMBER 0-5 
YES 



.•RETURN TO WAIT FOR TEST SELECT 
.-ROTATE TEST NUMBER INTO POSITION 



.♦TYPE 3 SPACES 
GET SELECTED PATTERN 



IS CHARACTER A VALID NLMBER 0-7 
NO 

IS CHARACTER A VALID Nl«ER 0-7 
NO 

MOVE PATTERN SELECT INTO POSITION 



.-COMBINE PATTERN WITH TEST 



SELECTION (0=EVEN. 1'K)DD) 



«60, CHARIN 
SELPR 

#61, CHARIN 
SELT3 
#400,R4 



IS CHARACTER^O 
YES, EVEN PARITY 
IS CHARACTER=1 
NO. HAVE ILLEGAL 
YES. OOD PARITY 



KEY 



176574 
176564 



;WAIT FOR DENSITY SELECTION 
WAITKY 
CMPB 



176546 SELDN1: 



176530 SELDN2: 



SELDN3: 



BEQ 

CMFS 

BNE 

BIS 

BR 

CMPB 

BNE 

BIS 

BR 

CMPB 

BNE 

BIS 

SP3 



#62, CHARIN 
SEL0N3 
#65, CHARIN 
SELM1 
#100.R4 
SELDN3 
#70. CHARIN 
SELDN2 
#200.R4 
SELDN3 
#'C. CHARIN 
SELT3 
#300,R4 



;IS CHARACTER=2 
;Y£S, DENSITY=2008PI 
;IS CHARACTER'S 
'NO 

•SET DENSITV=556 BPI 

:IS CHARACTER'S 

;SET DENSITY'SOO BPI 

;IS CHARACTER=C 

;N0, HAVE ILLEGAL KEY 

.-SET CORE DUMP MODE 



CZTMCDO TMII DATA RELIAB 
CZmCD.PH 03-JUN-80 15:26 



MACYll 30A(1052) 03-JUN-80 



L 2 
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SEO 002A 



1276 

1277 

1278 

1279 

1280 

1281 

1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 

1328 

1329 

1330 

1331 



002606 
002610 
002616 
002620 
002626 
0C2630 
002634 
002636 
002644 
002646 
002652 
002654 
002662 
002664 
002670 

002672 
002674 
002702 
002704 
002712 
002714 
002720 
002722 
002730 
002732 
002736 

002740 
002742 
002750 
002752 
002760 
002762 
002766 
002770 
002776 
003000 
003004 
003010 



003012 
003016 
003020 
003022 
003030 
003032 
003036 
003042 
005044 
003052 
003056 
003060 
003066 



104400 
122767 
001424 
122767 
001003 
052704 
000415 
122767 
001003 
052704 
000406 
122767 
001242 
052704 
104430 

104400 
122767 
001415 
122767 
001003 
052704 
000406 
122767 
001217 
052704 
104430 

104400 
122767 
001417 
^ 22767 
001003 
052704 
000410 
122767 
001402 
000167 
052704 
104430 



012702 
104404 
104400 
122767 
001402 
000167 
105777 
100375 
012777 
105777 
100375 
012777 
010420 



177332 
175460 

000012 
175444 

000040 



176510 
176500 

176462 

176444 



176424 
176414 



000060 
000061 
000020 
000062 
000040 
000063 
000060 

000060 
000061 
000004 
000062 
000010 

000060 

000061 

000001 

000062 

177364 
000002 

012621 

000015 176276 



;yAIT FOR RECORD LENGTH SEQUENCES 
UAITKY 
#60.CHARIN 
SELR3 

#61.CHARiN 
SELR1 
#20.R4 
SELR3 

#62«CHARJN 
SELR2 
#40,R4 
SELR3 

#63,CHARIN 
SELT3 
4r60,R4 



C«PB 
BEQ 
CnPB 
BNE 
BIS 
BR 

SELR1 : CMPB 
BNE 
6JS 
BR 

SELR2: C«PB 
BNE 
BIS 

SELR3: SP3 
.yAIT FOR yRJTE MODE SELECTION 
UAJTKy 



SELECTION 

js c>-;aracter=o 

YES, RLS=«IN 
JS CHARACTER=1 

SET RLS^lAX 

IS CHARACTEft=2 

SET RLSsfllN-flAX 

IS CHARACTER=3 

SET RLS^MAX-fflN 



176376 SELWI: 



SELW2: 



CrtPB 

BEQ 

C«PB 

BNE 

BIS 

BR 

C«P8 

BNE 

BIS 

SP3 



#60,CHARIN 
SELU2 

#61«CHARIN 

SELU1 

#4,R4 

SELU2 

#62,CHARIN 

SELT3 

#10,R4 



176356 
176346 

176330 



:UAIT FOR READ MODE SELECTION 
UAITKY 



C«PB 

BEQ 

C«PB 

BNE 

BIS 

BR 

SELRni: CMPB 
BEQ 
J«P 
BJS 

SELRn2: SP3 



#60,CHARIN 
SELRn2 
#61,CHARIN 
SELR«1 
#1 ,R4 
SELRM2 
#62,CHARIN 
.♦6 
SELT3 
#2,R4 



;HAVE ALL PARAMETERS 



175452 
175436 



nov 



C«P8 

BEQ 

J«P 

TST8 

BPL 

nov 

TSTB 
BPL 

nov 
nov 



imSG6,R2 
TOP 
UAJTKY 
#15,CHARIN 
.♦6 
SELT3 
aTPS 
.-4 

#12,aTP8 

arps 

.-4 

#40,aTP8 
R4,(0)* 



;SET l#1O=N0NST0P 



;SET WMO=START-STOP 



;SET l#10=RAND0n 



;SET RMO=N0NSTOP 



;SET RnO=START-STOP 



;SET RnO=RAM>0n 



*PRINT '10K" 

;UAIT FOR CARRIAGE RETURN 



cz 
cz 



MCDO THII DATA RELIAB 
nCD.PII 03-JUN-80 15:26 



PWCYll 30A(1052) 03-JUN-80 



M 2 
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SEO 0025 



332 003070 

333 003074 

334 003102 

335 003104 

336 003110 

337 003114 
338 

339 

340 003116 

341 003122 

342 003124 

343 003132 

344 003140 

345 003144 

346 003150 

347 003154 

348 003156 

349 003162 

350 003164 

351 003170 

352 003172 

353 003176 

354 003200 

355 003204 

356 003206 

357 003212 
358 

359 003216 

360 003222 

361 003224 

362 003226 

363 003234 

364 003236 

365 003242 

366 003246 

367 003252 

368 003254 
^69 003262 
oTO 003264 

371 003270 

372 003272 

373 003276 

374 003300 

375 003304 

376 003306 

377 003310 

378 003312 

379 003314 

380 003516 

381 003320 

382 003326 
383 

384 
385 

386 003330 

387 003336 



005267 
022767 
001402 
000167 
012702 
104404 



005067 
104434 
012767 
017767 
016700 
042700 
010067 
001465 
022700 
001506 
022700 
001527 
022700 
001573 
022700 
001402 
000167 
000167 

012702 
104404 
104436 
032777 
001413 
016700 
042700 
022700 
001404 
062767 
000726 
005367 
001013 
013702 
001004 
012702 
104404 
000000 
004712 
000240 
000240 
000240 
062767 
000701 



052767 
104420 



176234 
000012 

177214 
012574 



175522 

001340 
176176 
176166 
007777 
176162 

010000 

020000 

030000 

040000 

001014 
000466 

013723 



001000 
176040 
000042 
013730 



176226 



SELOKl 



INC 
CMP 
BEQ 
JWP 

nov 



NUMTST 

#10..NUMTST 

SELOKl 

SELT1 

*MS65.H2 

TOP 



.•EXECUTE 
EXE CUT: 



SELECTED TEST 



176202 
176172 



EXEC: 
EXECl : 



.•RETURN 
DONE: 



CLR MODES 
CNTI 

MOV #TSTTBL.TSTEX 

MOV aTSTEX.PARAM 

MOV PAAAM.RO 

BIC #7777, RO 

MOV RO.TEST 

BEQ TESTO 

CMP #10000. RO 

BEQ TESTl 

CMP #200'<O.RO 

BEQ TESTc 

CMP #30000. RO 

BEQ TEST3 

CMP #40000, RO 

BEQ >6 

JMP TEST5 

JMP TEST4 

HERE AFTER COMPLETION OF TEST 



*1 TO TEST COUNT 
EQUAL TO TEN YET 
YES 

NO, ACCEPT NEXT SET 



; INITIALIZE MODES 



;6ET TEST PARAMS 



000001 175256 

176070 
170777 
007000 



176050 



DONEl: 

CH6D2: 
ENDADR: 



000002 176006 DOAGN: 



MOV 

TOP 

CKSW 

BIT 

BEQ 

NOV 

BIC 

CMP 

BEQ 

ADD 

BR 

DEC 

BNE 

MOV 

BNE 

MOV 

TOP 

HALT 

JSR 

NOP 

NOP 

NOP 

ADD 

BR 



#nS630.R2 



#1,aSWR 

D0NE1 

#1 70777. RO 
#7000. RO 
DONEl 

#1000,PARAM 

EXECl 

HJKTSJ 

DOAGN 

a#42,R2 

EM>ADR 

4nS631 ,R2 



PC, (2) 



#2,TSTEX 
EXEC 



:1F BIT 0=1 REPEAT ALL PATTERNS 



REACHED PAT 7 
YES 

NO, +1 TO PAT 
REPEAT 



; PRINT END OF PASS 
.•FINISHED ALL TESTS 



;D0 NEXT TEST 



000002 175306 



; TESTO 

.-WRITE ONE RECORD. CHANGE DRIVES. 60 TO EOT 

TESTO; BIS #^,MOOES ;EXIT WRITE EVERY RECORD. NO READ PASS 

CLRALL .-CLEAR ERROR COUNTERS AM) REWIND 



C2 
C2 



TMCDO 


TMII DATA RELIAB 


TMCD.P11 03-JUN-80 


15:26 


1388 


003340 


104416 




1389 


003342 


104410 




1390 


003344 


104414 




1391 


003346 


032767 


000040 


1392 


003354 


001002 




1393 


003356 


104402 




139^ 


003360 


104406 




1395 








1396 


003362 


104422 




1397 


003364 


000767 




1398 


003366 


004767 


001452 


1399 


003372 


000763 




KOO 


003374 


000167 


177616 


K01 








K02 








K03 


003400 


052767 


000001 


1^ 


003406 


104420 




1405 


003410 


104416 




1406 


003412 


104410 




1407 


003414 


104414 




1408 


003416 


032767 


000040 


1409 


003424 


001002 




1410 


003426 


104402 




1411 


003430 


104406 




1412 


003432 


104422 




1413 


003434 


000767 




1414 


003436 


004767 


001402 


1415 


003442 


000763 




1416 


003444 


000167 


1 77546 


1417 








1418 








419 








1420 








1421 


003450 


052767 


000005 


1422 


003456 


104420 




1423 


003460 


104416 




1424 


003462 


104410 




1425 


003464 


104414 




1426 


003466 


032767 


000040 


1427 


003474 


001002 




1428 


003476 


104402 




1429 


003500 


104406 




1430 


003502 


104422 




1431 


003504 


000767 




1432 


003506 


104414 




1433 


003510 


032767 


000020 


1434 


003516 


001003 




1435 


003520 


004767 


005206 


1436 


003524 


104406 




1437 


003526 


104422 




1438 


003530 


000766 




1439 


003532 


104414 




1440 


003534 


032767 


000020 


1441 


003542 


001001 


1442 


003544 


104424 




1443 


003546 


104406 





N 2 
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175270 



175236 



175220 



175150 



175126 



175102 



6ENPAT 

TO: RSfDRV 
TOA: MVCTRS 

BIT #40.nODES 
BNE TOB 

URITIT 
SVCTRS 



TOB: 

BR 
JSR 
BR 
J«P 

;TEST1 

;URJTE RECORD 
TEST1 : BIS 



T1: 
T1A: 



TIB: 



CHGDRV 
TOA 

PCALLEOT 
TO 

DONE 

LENGTH SEQUENCE, 
#1 .MODES 
CLRALL 
6ENPAT 
RSFDRV 
MVCTRS 
BIT #40,nODES 
BNE TIB 

yRITIT 
SVCTRS 
CHGDRV 
BR TIA 
JSR PCALLEOT 
BR T1 
M* DONE 



GENERATE PATTERN 

RESET DRIVE SELECTION TO LOWEST NlfCER 
RESTORE DRIVE COUNTERS 
IS THIS DRIVE AT EOT? 
YES, SKIP WRITE 
WRITE 

SAVE DRIVE COUNTERS 

ANY MORE DRIVES SELECTED'' 
YES 

ARE ALL DRIVES AT EOT? 
NO 

YES, EXIT 

GO TO NEXT DRIVE, CONTINUE 10 EOT ON ALL 'DRIVES. 
EXIT WRITE AfTER RLS, NO RlAD PASS 
CLEAR ERROR COUNTERS AND REWIND 
; GENERATE PATTERN 

;RESET DRIVE SELECTION TO LOWEST NUTBER 
;RESTORE DRIVE COUNTERS 
IS THIS DRIVE AT EOT? 
YES, SKIP WRITE 
; WRITE 

;SAVE DRIVE COUNTERS 
;ANY MORE DRIVE SELECTED? 
YES 

;ARE ALL DRIVES AT EOT? 
;N0 

lYES EXIT 



;TEST2 

.WRITE A RECORD LENGTH SEQUENCE , 
.•BACKSPACE, CHANGE DRIVES, READ, 



175166 TEST2: BIS 



T2: 
T2A: 



T2B: 
T2C: 



T2D: 
T2E: 



T2f 



BIT 
BNE 



BR 

BIT 
BNE 
JSR 



BR 

BIT 
BNE 



#5, MODES 
CLAALL 
GENPAT 
RSfDRV 
HVCTRS 
f40,M0DES 
T2B 

URITIT 
SVCTRS 
CHGDRV 
T2A 

HVCTRS 

#20,M0DES 

T2D 

PCGOBKUD 
SVCTRS 
CHGDRV 
T2C 

HVCTRS 
#20, MODES 

T2f 

READIT 
SVCTRS 



CHMIGE DRIVES 
tmm DRIVES. CONTINUE TO EOT ON ALL DRIVES 
EXIT WRITE AFTER RLS, DO READ PASS 
CLEAR ERROR COIMTERS AND REWIND 
GENERATE PATTERN 

SET DRIVE SELECTION TO LOWEST NlfCER 

RESTORE DRIVE COUNTERS 

IS THIS DRIVE AT EOT? 

YES, SKIP WRITE 

WRITE 

SAVE DRIVE COUNTERS 
ANYMORE DRIVERS SELECTED? 
YES 

RESTORE DRIVE COUNTERS 
IS THIS READ AT EOT? 
YES, SKIP BACKSPACE 
BACKSPACE 

SAVE DRIVE COUNTERS 

ANY MORE DRIVES SELECTED? 

YES 

RESTORE DRIVE COUNTERS 
IS THIS READ AT EOT 
YES, SKIP READ 
READ 

SAVE DRIVE COUNTERS 



czTMCDO rmi data reliab 

C2TMCD.P11 03-JUN-80 15:26 
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SEO 0027 



i 


003550 


10442? 










CHGDRV 


ANYMORE DRIVES SELECTED'' 


1 J 




000767 








BR 


T2E ; 


YES 






004767 


001264 

WW 1 






JSR 


PC.ALLEOT ; 


ARE ALL DRIVES AT EOT? 




003560 


000740 








BR 


T2 ; 


NO 


K4fl 
1449 


00356? 


000167 


1 77430 






JMP 


DONE 


YES EXIT 


1450 










;TEST3 








1451 










:URITE ONE RECORD, CHANGE DRIVES, BACKSPACE, CHANGE DRIVES, READ, CHANGE 


1452 


003566 


052767 


000006 

WWW 


1 75050 


TEST3: 


BIS 


#6. MODES 


EXIT WRITE EVERY RECORD, DO READ PASS 


1453 


003574 


104420 










CLRALL 


CLEAR ERROR COUNTERS AND REWIND 


1454 


003576 


104416 










6ENPAT ', 


GENERATE PATTERN 


1455 


003600 


104410 






T3: 




RSFDRV 


SET DRIVE SELECTION TO LOWEST NUMBER 


1456 


003602 


104414 






T3A: 




fIVCTRS 


RESTORE DRIVE COUNTERS 


14S7 




flX?767 

WJC' Of 




1 r 




BIT 


#40,fi|00ES 


IS THIS DRIVE AT EOT? 


1458 


003612 


001002 








BNE 


T3B 


YES, SKIP WRITE 


1459 


003614 


104402 










URITIT 


WRITE 


1460 


003616 


104406 










SVCTRS 


-SAVE DRIVE COUNTERS 


1461 


003620 


104422 






T3B: 




CHGDRV 


ANY MORE DRIVES SELECTED 


1462 


003622 


000767 








BR 


T3A 


■YES 


1463 


















1464 


003624 


104414 






T3C: 




nVCTRS 


;RESTORE DRIVE COUNTERS 


1465 


003626 


032767 


000020 


175010 




BIT 


#20, MODES 


;IS THIS DRIVE AT EOT 


1466 


003634 


001002 








BNE 


T3D 


•YES, SKIP BACKSPACE 


1467 


003636 


004767 


005070 






JSR 


PCGOBKM) 


'BACKSPACE 


1468 


003642 


104406 






T3D: 




SVCTRS 


■SAVE DRIVE COUNTERS 


1469 


003644 


104422 










CHGDRV 


;ANY MORE DRIVES SELECTED? 


1470 


003646 


000766 








BR 


T3C 


;G0 


1471 


003650 


104414 






r3E: 




MVCTRS 


;REST0RE DRIVE COUNTERS 


1472 


003652 


032767 


000020 


174764 




BIT 


#20 .MODES 


;IS THIS DRIVE AT EOT? 


1473 


003660 


001001 








BNE 


T3f 


rYES, SKIP READ 


1474 


003662 


104424 










READIT 


;READ 


1475 


003664 


104406 






T3F: 




SVCTRS 


rSAVE DRIVE COUNTERS 


1476 


003666 


104422 










CHGDRV 


;ANY MORE DRIVES SELECTED 


1477 


003670 


000767 








BR 


T3E 


;YES 


1478 


003672 


004767 


001146 






JSR 


PCALLEOT 


jARE ALL DRIVES AT EOT? 


1479 


003676 


000740 








8R 


T3 


;N0 


1480 


003700 


000167 


177312 






J«P 


DONE 


;YES. EXIT 


1481 
1482 










;TEST4 








1445 










.WRITE 


RECORD, 


CHANGE DRIVES, REPEAT FOR RECORD LENGTH SEQUENCE 


1484 










:READ RECORD, 


CHANGE DRIVES, REPEAT FOR RLS 


1485 


003704 


052767 


000006 


174732 


TEST4; 


BJS 


/ir6,MQDES ;EXIT WRITE EVERY RECORD, DO READ PASS 


1486 


003712 


104416 










GENPAT ; GENERATE PATTERN 


1487 


003714 


032777 


000014 


175412 




BIT 


/ru.aiSTEx 




1488 


003722 


001006 








BNE 


T4 




1489 


003724 


042767 


000007 


174712 




BIC 


#7.M00ES 




1490 


003732 


052767 


000005 


174704 




BIS 


#5,M0DES 


.EXIT WRITE AFTER RLS, DO READ PASS 


1491 


003740 


104420 






T4: 




CLRALL 


; CLEAR ERROR COUNTERS AND REWIND 


1492 


003742 


104410 






T4A: 




RSFDRV 


;SET DRIVE SELECTION TO LOWEST NUMBER 


1493 


003744 


104414 






T48: 




MVCTRS 


; RESTORE DRIVE COUNTERS 


1494 


003746 


016767 


174652 


174652 




NOV 


REC0RD,WRRECR 


;SAVE RECORD 


1495 


003754 


104406 










SVCTRS 


;SAVE DRIVE COUNTERS 


1496 


003756 


104422 










CHGDRV 


.ANYMORE DRIVES SELCTED? 


1497 


003760 


000771 








BR 


T4e 


.YES 


1498 


003762 


042767 


000010 


174654 




BIC 


#10,M0DES 


.-INDICATE RLS END 


1499 


003770 


104410 






T4C: 




RSFDRV 


.-SET DRIVE SELECTION TO LOWEST NUMBER 



C2TMCD0 TMll DATA RELIAB 
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SEO 0028 



1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

15U 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

152A 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

1552 

1553 

1554 

1555 



174642 
174550 
174604 

174606 
174574 



003772 1044U 

003774 032767 000040 

004002 001010 

004004 016767 174616 

004012 104402 

004014 016767 174542 

004022 104406 

004024 104422 

004026 000761 

004030 032767 000010 

004036 001007 

004040 104414 

004042 032767 000040 

004050 001747 

004052 104422 

004054 000771 



004056 104410 

004060 104414 

004062 032767 

004070 001002 

004072 004767 

004076 104406 

004100 104422 

004102 000766 

004104 104410 

004106 104414 

004110 032767 

004116 001025 

004120 026767 

004126 001421 

004130 016767 

004136 032767 

004144 001405 

004146 016767 

004154 005267 

004160 104424 

004162 016767 

004170 104406 

004172 104422 

004174 000744 

004176 104414 

004200 026767 

004206 001336 

004210 104422 

004212 000771 

004214 004767 

004220 000650 

004222 000167 



004226 052767 000002 174410 
004234 104420 



T4D: 



T4E: 



T4F; 



BIT 
BNE 

nov 
nov 



BR 

BIT 

BNE 

BIT 
BEQ 

BR 



MVCTRS 

#40.nODES 

T4E 

URRECR,SVRECR 
URITIT 

SVRECR.yRRECR 

SVCTRS 

CH6DRV 

T4D 

/ricnoDES 

T4G 

MVCTRS 
#40«nODES 
14 C 

CH6DRV 
T4F 



RESTORE DRIVE COUNTERS 
IS DRIVE AT EOT 
YES, SKIP WRITE 
SAVE START OF RLS 
WRITE 

RESTORE START OF RLS 
SAVE DRIVE COUNTERS 
ANYMORE DRIVES SELECTED? 
YES 

ARE WE AT END OF RLS 

YES 

RESTORE DRIVE COUNTERS 

ARE WE AT EOT? 

NO 

ANYMORE DRIVES SELECTED? 
YES 







T4G: 




RSFDRV 


SET DRIVE SELECTION TO LOWEST NlfBER 






T4H: 




MVCTRS 


RESTORE DRIVE COUNTERS 


000020 


174554 




BIT 


#20,M0DES 


IS THIS DRIVE AT EOT? 






BNE 


T4J 


YES, SKIP BACKSPACE 


004634 






JSR 


PCGOBKWD 


BACKSPACE 




T4J: 




SVCTRS 


-SAVE DRIVE COUNTERS 










CHGDRV 


ANY MORE DRIVES SELECTED? 








BR 


T4H 


•YES 






T4K: 




RSFDRV 


'SET DRIVE SELECTION TO LOWEST NUMBER 






T4L: 




MVCTRS 


;RESTORE DRIVE COUNTERS 


000020 


174526 




BIT 


#20,M00ES 


;IS THIS READ AT EOT? 






BNE 


T4N 


'YES SKIP READ 


174504 


174476 




av 


LASRCR.RECORD 


;HAVE UE READ LAST RECORD WRITTEN? 








BEQ 


T4N 


YES 


174474 


174424 




MOV 


LASRCR.SVRECR 


;SAVE LAST RECORD 


000003 


175166 




BIT 


#3.PARAM 


;IS READ MODE NONSTOP? 






BEQ 


T4M 


;YES 


174452 


174454 




nov 


RECORD.LASRCR 




174450 






INC 


LASftCR 


;^1 TO LAST RECORD WRITTEN 




T4M: 


READIT 


;READ 


174374 


174440 




nov 


SVRECR^LASRCR 


;RESTORE LAST RECORD WRITTEN 










SVCTRS 


rSAVE DRIVE COUNTERS 






T4N: 




CHGDRV 


;ANYMORE DRIVES SELECTED? 








BR 


T4L 


;YES 






T4P: 




MVCTRS 


;RESTORE DRIVE COUNTERS 


174424 


174416 




CMP 


lASRCR.RECORD 


;ARE UE AT END OF RLS? 








BNE 


T4K 


;N0 










CHGDRV 


;ANYM0RE DRIVES SELECTED? 








BR 


T4P 


;YES 


000624 






JSR 


PC.ALLEOT 


;ARE ALL DRIVES AT EOT? 








BR 


T4A 


;N0 


176770 






JMP 


DONE 


; YES. EXIT 



;TEST5 
.READ ONLY 

;RAND0M PATTERN INVALID EXCEPT FOR SPECIFIC CASES 
TESTS: BIS *2.M0DES 

CLRALL .-CLEAR ERROR COUNTERS AND REWIND 



C2TMCD0 TMll DATA RELIAB MACYll 30A(1052) 03 

CZTMCD.PIl 03-JUN-80 15:26 



O JO 














1 «;^7 




ni 57A7 


1 77777 

\ t t t 1 1 




TS • 
1 J • 


nuv 


1 jjO 














1 <;co 


UUhcjU 


nT57A7 
Ujc'O' 


VTAA/ lU 


174X66 




RTT 


1 jOU 


UUHcjO 


VA/IhUc 








DCW 


1 ^1 

1 jO I 




VAJ'tf Of 










1 ^5 


(VV. 5AZ. 


U lOr Or 


1 74'^'^ 


non?i6 

\J\J\lC 1 O 




MOV 


1 jOj 


VAJHcr c 




1 74'X?6 








1 

1 jC* 


VAJHC' O 


nS?7A7 
\jjcf Of 


0O0010 


174X40 


1 JD • 




1 '\A^ 
1 JOj 


VAJH jW» 


1 USH 1 V 










1 jOO 




104414 






TSr • 
1 Ji. • 




1 JOr 






oooo?o 

\AAA/CV 


1743?6 




RIT 


1 JOO 


VA^J lO 


001007 










1 jOt 




ni 6767 

U lO' Of 


174^00 


1 74X0? 

1 f •? JVC 






1 jf\j 


nn^ VA 

UVt JCO 


fV«6767 

UDOf Of 


0001 S6 


1 74?74 




ADD 


1 *;7i 
1 J f 1 




1O4406 










1 jr C 




1044?? 














00076? 

\AA/f Oc 








BR 


1 S7^ 
1 jf *» 


lA^JHC 


104410 










1S7S 

1 J r J 


AA/-t/-/. 


104414 






TSF • 




1 J r O 


\A^ JHO 


0V767 

w JC f O f 


0000?0 

WWCw 


1 74270 




BIT 




no4T^ 

\A^ JJ** 


001 0?1 








BNE 


1S7R 

1 jr O 


\A^ JJV 


016767 


1 74?46 


174176 




nov 


1 J r T 


004 '^M 


0'7?767 

vJC f \Jf 


000003 

WVWJ 


174740 




BIT 


1 JuV 


004 '^7? 


001 40S 








BEO 


1 JO 1 


004 '^4 


016767 

w 1 ur Or 


1 74224 


1 74226 




nov 


1 JOc 


00440? 


00S?67 


1 74222 

1 r ^^CC 






INC 


1 JOJ 


004406 


1044?4 






T5F : 




1 JO"f 


004410 


01 6767 

W I Or Or 


174146 


1 7421 2 




nov 


1 JOJ 


004416 


104406 










1 JOO 


0044P0 


1044?? 






T5G- 




1 JOf 


0044?? 


0007S0 








BR 


1 JOO 


0044?4 


004767 

f Of 


000414 






JSR 


1 JOT 


0044'y) 


00040? 








BR 


1 jT^ 


0044V 


000167 

Wv 1 Or 


176S60 






JMP 


1^Q1 
1 J7 1 




104410 










1 JTC 


004440 


104414 






T5J' 








0?6767 

wCOr Or 


1 741 S6 

1 r ■? 1 ./O 


174160 

1 f ^ 1 W 




cnp 


1 J7^ 


0044 so 

^^f^ JV 


00100'^ 








BNE 


1 JTJ 


0044S? 

^^f^ JC 


04?767 

f Of 


000010 

WW 1 V 


174164 




BIC 


1 JTW 


004460 


1044?? 












00446? 


000766 








BR 


1 J^O 


004464 


01?767 

r Or 


000010 


174152 




BIT 


1S99 


00447? 


001 V4 








BNE 




004474 


004767 


000344 

WW 






JSR 


1 yJKf 1 


004 SOO 


0006S7 

WOO J r 








BR 




004 SO? 


000167 

WV I or 


176510 






JMP 




004 S06 


000000 
www 






T5FLA6: 


0 




004S10 


000000 
www 






T5INC: 


0 


1605 














1606 










.SAVE DRIVE 


1607 


004512 


004767 


000030 




SVCTR: 


JSR 


1608 


004516 


012021 






SVC1 : 


MOV 


1609 


004520 


022700 


0006A6 






CMP 


1610 


00452A 


001374 








BNE 


1611 


004526 


000207 








RTS 



D 3 

JUN-80 15:27 PAGE 29 



GENPAT ; GENERATE PATTERN 

#-1,T5FLAG .-ENABLE EXIT FROM WRITE ROUTINE 

URITJT .-ENTER WRITE ONLY TO INITIALIZE RECORD SEQUENCE 

#10,nODES .-ARE WE AT END OF RLS? 

T5A .-YES 

PC.TESINC .-SEE IF RECORD LENGTH SHOULD BE CHANGED 

RECORD. T5INC 

RECORD 

#10. MODES .-INDICATE AT START OF RLS 

RSFDRV .-SET DRIVE SELECTION TO LOWEST DRIVE NUTCER 

MVCTRS .RESTORE DRIVE COUNTERS 

#20,M0DES ;IS THIS DRIVE AT EOT 

T5D ;YES 

RECORD, LASRCR 

T5INC.LASRCR .CURRENT RECORD * SEQUENCE LENGTH 

SVCTRS ;SAVE DRIVE COUNTERS 

CH6DRV .-ANYMORE DRIVES? 

T5C ;YES 

RSFDRV ;SET DRIVE SELECTION TO LOWEST NUMBER 

MVCTRS .-RESTORE DRIVE COUNTERS 

#20,M0DES ;IS THIS DRIVE AT EOT? 

T5G ; YES 

LASRCR, SVRECR .SAVE END OF RLS RECORDS 

#3.PARAM :IS READ MODE NONSTOP 

T5F ;YES GO TO END RLS 

RE CORD, LASRCR ;NEXT TO BE READ 

LASRCR ;+1 EXIT READ AFTER ONE RECORD 

READIT .-READ 

SVRECR.LASRCR .-RESTORE END RECORD 

SVCTRS .-SAVE DRIVE COUNTERS 

CHGDRV ;ANY MORE DRIVES? 

T5E ;YES 

PCALLEOT ;ALL AT EOT? 

T5H ;N0 

DONE ;YES EXIT 

RSFDRV .-SET DRIVE SELECTION TO LOWEST NUMBER 

MVCTRS .-RESTORE DRIVE COUNTERS 
RECORD, LASRCR ;ARE WE AT END OF RLS? 

T5K ;N0 

#10,M0DES ;YES. 

CHGDRV .-ANYMORE DRIVES SELECTED? 

T5J ;YES 

#10.M0DES ;AT END OF RLS? 

T5E ;N0 

PC.ALLEOT .-ALL DRIVES AT EOT? 

T5 ;N0 

DONE ;VES. EXIT 



RECORD AND ERROR COUNTERS 
PCCTRDEX 
(0)+,(1)+ 
mVADR.RO 

SVCI 
PC 



C2TMCD0 TM11 DATA RELIAB 
C2TMCD.P11 03-Jl>4-80 15:26 



NACYll 30A(1052) 03-JUN-80 



E 3 
15:27 PAGE 



30 



SEO 0030 



1612 

1613 

16K 

1615 

1616 

1617 

1618 

1619 

1620 

1621 

1622 

1623 

1624 

1625 

1626 

1627 

1628 

1629 

1630 

1631 

1632 

1633 

1634 

1635 

1636 

1637 

1638 

1639 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 

1661 

1662 

1663 

1664 

1665 

1666 

1667 



004530 
004534 
004536 
004542 
004544 

004546 
004552 
004556 
004562 
004566 
004570 

004572 
004574 
004600 
004604 
004606 
004610 
004612 
004620 
004624 

004626 
004632 
004640 
004646 
004650 
004654 
004656 
004662 
004664 
004672 
004676 
004702 
004704 
004712 
004720 
004722 
004730 
004736 
004740 
004746 



004750 
004754 
004756 
004762 
004764 
004766 
004772 
004774 
005002 



004767 
012120 
022700 
001374 
000207 

012700 
012701 
066701 
066701 
011101 
000207 

104410 
004767 
004767 
104406 
104422 
000771 
052767 
005067 
000207 

005067 
012767 
036767 
001006 
005267 
000241 
006067 
000766 
016767 
000367 
105767 
100003 
052767 
032767 
001403 
052767 
032767 
001003 
052767 
000207 



005267 
000241 
006067 
001004 
104410 
062716 
000207 
036767 
001762 



000012 
000646 



000602 
000646 
174006 
174002 



000206 
000352 



000010 
177662 



173736 
000200 
173714 

173714 

173704 

173700 
173666 
174430 

040000 
000100 

020000 
000400 



.RESET DRIVE COUNTERS BACK INTO PROGRAM 



MVCTR: 
MVI: 



JSR 
MOV 
CMP 
BNE 
RTS 



PC-CTRDEX 
(1)*.(0)* 
4rDRVA0R,R0 
MVI 

PC 



.SET UP POINTERS FOR MOVE AND SAVE COUNTERS 



CTRDEX: MOV 
MOV 
ADD 
ADD 
MOV 
RTS 



4rURCHEK.R0 
#DRVADR.R1 
CDRIVE.R1 
CDRJVE,R1 
aRI.RI 
PC 



.CLEAR ALL DRIVE COUNTERS 



CLRAL: 
CLR1: 



174024 



173726 
173720 



JSR 
JSR 



BR 
BIS 
CLR 
RTS 



RSFDRV 
PC, REWIND 
PCCLRTBL 
SVCTRS 
CHGDRV 
CLR1 

#10, MODES 
T5FLAG 

PC 



;AT END OF RLS 



.•RESET DRIVE SELECTION TO LOWEST NUMBER 



RSFDR: 
RSF1; 



173672 RSF2: 



173652 
174412 



173634 
174374 



004000 173616 

173614 
173604 



CLR CDRIVE 

MOV #200.CDRVBT 

BIT MS8ITS.CDRVBT 

BNE RSF2 

INC CDRJVE 
CLC 

ROR CDRVBT 

BR RSF1 

MOV CDRJVE, COMANO 

SUAfi CCnAND 

TSTB PARAM 

BPL .+10 

BIS #40000. COHAND 

BIT #100,PARAM 

BEQ .^10 

BIS #20000,CQNAND 

BIT #400,PARAM 

BNE .>10 

BIS #4000,C(MAND 

RTS PC 



.•START WITH DRIVE 0 
:BIT FOR DRIVE 0 
;IS DRIVE SELECTED? 
;yES 

;N0 * 1 TO DRIVE 

.ROTATE DRIVE BIT 
.•REPEAT 



:SET PROPER DENSITY BITS 



.TEST PARITY SELECTED 

:ODD 

;EVEN 



.•SELECT NEXT DRIVE IN SEQUENCE 
:*'\ WORD TO EXIT ADDRESS IF LAST DRIVE TESTED 



CHGDR: 



000002 
173566 



173556 CHG1 



INC CDRIVE 

CLC 

ROR CDRVBT 

BNE CHG1 

RSFDRV 

ADD #2,aSP 

RTS PC 

BIT CDRVBT .MSBITS 

BEO CHGDR 



TO DRIVE NLfCER 

.-MOVE MASK BIT OVER 1 PLACE 
.•BRANCH IF MORE DRIVES SELECTED 
.RESET DRIVE SELECT TO LOWEST NLMBER 
;♦ 2 TO SKIP OVER FIRST EXIT 



CZTMCDO TMll 
CZTMCD.Pn 



DATA RELIAB 
03-JUN-80 15:26 



MACY11 30A{1052) 03-JUN-80 15:27 



F 3 
PAGE 



31 



1668 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 



005004 000727 



005006 
005012 
005014 
005022 
005026 
005030 
005036 
005042 

005044 
005046 
005050 
005056 
005060 
005062 
005064 
005066 
005070 
005076 
005100 
00i>106 

005110 
005112 
005114 
005120 
005122 
005126 
005130 
005136 
005140 
005144 
005146 
005150 
005154 



005156 
005162 
005164 
005170 
005172 
005200 

005202 
005210 
005216 
005224 
005232 
005234 
005242 
005244 



105777 
100375 
016777 
006077 
103375 
052777 
004767 
000207 

104410 
104414 
032767 
001403 
104422 
000771 
000431 
104436 
032777 
001426 
032767 
OOU 22 

104410 
104414 
005767 
001007 
004767 
104436 
032767 
00U02 
004767 
104422 
000761 
062716 
000207 



012700 
005020 
020027 
001374 
042767 
000207 

012777 
012767 
012777 
052777 
000001 
012777 
000207 
012767 



173470 

173544 
173452 

000016 
000140 



000400 
000010 



000602 
000644 
000070 

000200 
000001 
005244 
000101 

000340 

000240 



SEO 0031 



BR 



RSF2 



; REWIND DRIVE TO BOT 



REWIND: 



173460 
173444 



TSTB 
BPL 
MOV 
ROR 
BCC 
BIS 
JSR 
RTS 



aMTC 
.-4 

COMAND.anTC 

aMTS 

.-4 

#16. aMTC 
PCGOWAIT 
PC 



;ARE ALL DRIVES AT END OF 
ALLEOT: RSFDRV 



TAPE 



000060 1 73566 



173414 
173536 



ALL1 



ALLEOS: 



BIT 
BEQ 



BR 
BR 
CKSW 
BIT 
BEQ 
BIT 
BEQ 



MVCTRS 
#60.MODES 
ALLEOS 
CH6DRV 
ALL1 
ALL3 



.-WAIT FOR CONTROL UNIT 
.'SELECT DRIVE 

.•WAIT FOR TU READY 
.•REWIND 

.•EXIT 



AT EOT? 
NO 

DONE ALL DRIVES? 
NO 



#400.aSUR 

ALL2 

/riO.MODES 
ALL^ 

.DUMP ERROR COUNTERS ON ALL DRIVES 
CTRDMP: RSFDRV 



TEST SWITCH 8 TO EXIT AT END OF SEQUENCE 
NO, 60 TO EOT 
AT END OF SEQUENCE 
NO. EXIT, DON'T DiJMP ERROR COUNTERS 







MVCTRS 






177366 




TST 


T5FLA6 








BNE 


CTRD1 


.DUMP READ ONLY 


001100 




JSR 
CKSW 


PC.ENDT1 




000004 


173506 


BIT 


#4 .MODES 


.-READ PASS SELECTED? 




BEQ 


CDMEND 


;N0 


003112 


CTRD1 : 


JSR 


PC.RN0TP1 


.DONE ALL DRIVES 




CDMEND: 


CHGDRV 






BR 


CTRDMP+2 


'NO 


000002 


ALL3: 


ADD 


#2,(6) 


•INCREMENT RETURN POINT 




ALL2: 


RTS 


PC 





.-CLEAR READ AND WRITE TABLES 



173444 

173300 
000014 
173312 
173250 

173246 

1 77760 



CLRT8L: MOV 
CLRT1 : CLR 
CMP 
BNE 
BIC 
RTS 



/rURCHEK.RO 

(0)* 

RO.#nODES 

CLRT1 

#70,nODES 

PC 



.INTERRUPT EftMLE. GO, WAIT FOR 



GOUAIT: 



SWAIT: 



GW1 



MOV 
MOV 
MOV 
BIS 
WAIT 
MOV 
RTS 
MOV 



#^,acc 

#1,SyAIT 
#GU1 ,aMTV 

#101, aMTC 
#340,acc 

PC 

#240. SWAIT 



INTERRUPT 

SET PRIORITY LEVEL 4 

#1syAJT INSTR 

SET INTERRUPT RETURN 

INTERRUPT EN^E, GO 

yAlT FOR INTERRUPT 

RESTORE PRIORITY LEVEL 7 

EXIT 

NOP IT JUST IN CASE 11/34 



CZTMCDO TMII 
CZTMCD.Pn 



DATA RELIAB 
03-JUN-80 15:26 



rwcrll 30A(1052) 03-JLM-80 15:27 



G 3 
PAGE 



32 



SEO 0032 



1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 

1771 

1772 

1773 

1774 

1775 

1776 

1777 

1778 

1779 



005252 000002 



005254 
005260 
005262 
005270 
005276 
005304 
005306 
005314 
005322 
005330 
005336 
005340 
005344 
005352 
005356 
005360 
005362 
005366 
005374 
005400 
005402 
005406 
005410 
005416 
005422 
005430 
005436 

005442 
005450 
005454 
005456 
005462 
005464 
005470 
005472 
005476 
005500 
005504 
005512 
005514 
005520 
005522 
005526 
005534 
005536 
005544 
005546 
005550 
005556 
005560 
005562 
005570 



005767 
001031 
016767 
012767 
032767 
001006 
016767 
012767 
016767 
032767 
001002 
005067 
016767 
005767 
001401 
000207 
005067 
016777 
105777 
100375 
006077 
103375 
016777 
005477 
016777 
052777 
004767 

017767 
005777 
100542 
005767 
001410 
016700 
006300 
062700 
005210 
005067 
032767 
001023 
005767 
001333 
004767 
032767 
001405 
032767 
001721 
000207 
032767 
001714 
000207 
032767 
001414 



173344 

173240 
177774 
000020 

173216 
OOtXXK 
173226 
000040 

173232 
173254 
177130 



173206 
173172 
173102 

173072 

173224 
173062 
173104 
000004 
1 77540 

173032 
173026 

173112 

173104 

000602 

173070 
000014 

173054 

000142 

oonool 

000010 



000002 
000010 



RTI 

; WRITE RECORD 
WRIT]: TST 
BNE 

1 73264 MOV 
1 73300 MOV 
174026 BIT 
BNE 

173240 MOV 
173254 MOV 
173310 W1: MOV 
173774 BIT 
BNE 
CLR 

173254 NOINCR: MOV 
TST 
BEQ 
RTS 
CLR 
MOV 
TSTB 
BPL 
ROR 
BCC 

173066 NONSTP: MOV 
NEG 

1 73056 MOV 
173044 BIS 
JSR 

.•RETURN HERE 



.•RETURN FROM INTERRUPT 



173106 STRTOP: 



173130 



173620 TSTSTP: 

173110 
173100 



173066 
173542 



W10: 



STOPOP: 



MOV 

TST 

mi 

TST 
BEO 
MOV 
ASL 
ADD 
INC 
CLR 
BIT 
BNE 
TST 
BNE 
JSR 
BIT 
BEO 
BIT 
BEO 
RTS 
BIT 
BEO 
RTS 
BIT 
BEO 



SECTION 
RECORD 
NOINCR 

MAXLEN.STRLEN 
#-4..BLKlNC 
#20.PARAM 
Wl 

MINLEN.STRLEN 

f4..BLKINC 

STRLEN.URTLEN 

/r40.PARAM 

NOINCR 

BLKINC 

RECORD.URRECR 

T5FLAG 

.♦4 

PC 

WRPASS 
CQMAND.aMTC 

mic 

.-4 

iMTS 

.-4 

URTLEN.aBC 

aec 

UBUF.aCA 
#4,aMTC 
PCGOUAIT 
AFTER INTERRUPT 

anrs.sTATRo 
anrc 

ERROR 

MPASS 

TSTSTP 

URPASS.RO 

RO 

iTURCHEK.RO 

aRO 

URPASS 

#14,PARAM 

STOPOP 

URPASS 

NONSTP 

PCXES INC 

#1 .MOOES 

WlO 

#10,M00ES 
NONSTP 

PC 

*2 .MOOES 

NONSTP 

PC 

#10. PAR AM 
W11 



;JS THIS THE FIRST RECORD 

;N0. SKIP SET UP OF RECORD LENGTH AND BLOCK INCREMENT 



DOES RECORD LENGTH CHANGE? 

YES 

NO 



EXIT WRITE ROUTINE IF TEST 5 

SELECT UNIT 

WAIT FOR CU READY 
WAIT FOR TU READY 

SET BYTE C(XMJ 

SET CURRENT ADDRESS 
WRITE 

INTERRUPT ENABLE. GO. WAIT FOR DONE 
SAVE STATUS 

HAVE ERROR FLAG. CHECK FOR LOT 

WAS THIS A RECOVERY PASS 

NO 

YES 



♦1 TO APPROPRIATE RECOVERY PASS COlMTER 

IS WRITE MOOE NONSTOP? 

NO 

YES 

CHANGE RECORD LENGTH 
EXIT AFTER RLS? 
NO 

YES. ARE WE AT END OF RLS? 

NO 

YES 

EXIT EVERY RECORD? 

NO 

YES 

IS WRITE MODE RANDOM? 
NO 



cz 
cz 



nCDO Tmi DATA RELIAB 
MCD.Pll 03-JUN-80 15:26 



HACyil 50A(1052) 03-JUN-80 



H 3 

15:27 PAGE 33 



SEO 0033 



780 

781 005572 

782 005576 

783 005604 

784 005610 

785 005612 

786 005614 

787 005620 

788 005622 

789 005626 

790 005630 

791 005634 

792 005642 

793 005644 
79<. 005652 

795 005654 

796 005656 

797 005664 

798 005666 
799 

800 005670 

801 005674 

802 005702 

803 005706 

804 005710 

805 005716 

806 005724 

807 005726 

808 005734 

809 005736 

810 005744 

811 005750 

812 005752 

813 005760 
814 

815 
816 
817 
818 
819 

820 005762 

821 005770 

822 005772 

823 005776 

824 006000 

825 006004 

826 006012 

827 006014 

828 006020 

829 006022 

830 006030 

831 006054 

832 006036 

833 006044 
854 006046 
8?5 006052 



004767 
052767 
012704 
005204 
001376 
005267 
001371 
005767 
001257 
004767 
032767 
001405 
032767 
001645 
000207 
032767 
001640 
000207 

005267 
042767 
005767 
001416 
066767 
026767 
002404 
026767 
003403 
016767 
105767 
001003 
052767 
000207 



001450 
177400 
177470 



001576 

172746 

000034 
000001 

000010 



172730 
000010 
172670 

172662 
172716 

172706 

172612 
172654 



001612 



173002 
\72772 



172742 

\72722 
\72b^U 

y72572 

\72b7U 



000010 172664 



; RANDOM 
RANSTP: 

RAN1: 



U11 



000002 172760 Ul2: 



;SEE IF 
TESINC: 



RESETL: 
TSJNC2: 



TSINC3: 



STALL DELAr 

JSR PC.RANGEN 

BIS #177400, RANDOM 

MOV #-200. ,R4 

INC R4 

BNE .-2 

INC RANDOM 

BNE RANI 

TST URPASS 

BNE SIR TOP 

JSR PC. TESINC 

BIT #1 -MODES 

BEQ W12 

BIT #10.«OOES 

BEQ STRTOP 

RTS PC 

BIT #2 .MODES 

BEQ STRTOP 

RTS PC 

RECORD LENGTH SHOULD BE 

INC RECORD 

BIC flO.MODES 

TST BLKINC 

BEQ TSINC2 

ADD BLKINC. WRTLEN 

CMP URTLEN.MINLEN 

BLT RESETL 

CMP yPTLEN.MAXLEN 

BLE TSINC2 

MOV STRLEN.yRTLEN 

TST8 RECORD 

BNE TSINC3 

BIS #10.M0DES 

RTS PC 



.•DELAY 1 MILLISECOND 



EXIT AFTER RLS? 
NO 

YES. ARE UE AT END OF RLS? 

NO 

YES 

EXIT EVERY RECORD? 
NO 
YES 
CHANGED 
♦1 TO RECORD COUNT 
NOT END OF RLS UNLESS SET BELOW 



.•RECORD LENGTH TOO SHORT? 
; YES, RESET 

.•RECORD LENGTH TOO LONC 
;N0 

;YES. RESET 
*N0 

•INDICATE AT END OF RLS 



HAVE AN ERROR FLAG DURING WRITE OPERATION 

IF ERROR IS CAUSED BY END OF TAPE FLAG DUMP WRITE ERROR COWTERS 
FOR ALL OTHER ERAORS: PRINT COMMAND AND STATUS REGISTERS AND RECORD NL/CER 
IF READ PASS IS SELECTED. TRY TO RECOVER BY WRITING WITH X1R6. 



032767 


175600 


172610 


ERROR: 


BIT 


#1 75600. STATRD 


;AT EOT? 


001511 








BEQ 


ENDTAP 


;VES 


005767 


172576 






TST 


WRPASS 




001002 








BNE 


ERR1 


; FIRST ERROR? 


005267 


172576 






INC 


WRCHEK 


;YES, ♦ 1 TO WRITE ERROR 


032777 


020000 


172500 


ERRl: 


BIT 


#20000.aSWR 


.-TYPE ALL ERRORS? 


001011 








BNE 


TESREC 


;N0 


012702 


012626 






MOV 


mSG7.R2 




104404 










TOP 


.PRINT ERROR 


016767 


172612 


172526 




MOV 


URTLEN.LENGTH 




004767 


003006 






JSR 


PC.PRTS 


.•PRINT STATUS. COWAND. 


104436 








CKSW 




032777 


000100 


172446 


TESREC: 


BIT 


#ioo.aswR 


.RECOVER STATISTICALLY S 


001410 








BEQ 


TESRC1 


;N0 


005267 


172522 






INC 


WRPASS 


TO WRITE RECOVER 


022767 


000010 


172514 




CMP 


#8. .WRPASS 


;HAVE WE TRIED TO WRITE 



TMCOO TMII DATA RELlAB 
MCO.PII 03-JUN-80 15:26 



IIACYII 30A(1052) 03-JUN-80 15:27 





006060 


001 Ocv 










0 ' ACL 1 




00606^ 


005<:6/^ 


1 7051/ 








DFOMQC 




006066 




/WWkZ 

UOOUOh 


1 70Qcn 


TC cor 1 • 


D r T 


ML MAAFC 


ia59 


0060 


/v\i y A'5 
001402 








btu 


. ♦0 




0060'6 


7^7 

004 /'or 


AAOy 1 5 
O0c*»l c 






J on 




1 oy 1 


006102 


00506 


1 70/ iLJL 

1 /^h66 






n D 


LiODACC 




006106 


A»07it7 


ru^OAAA 

OOcOOO 


1 ^c*»o*» 




D T T 


• c WW , 0 1 M 1 aU 


1 ay T 


OOoIIh 


001 Uj/ 








DrMC 


Crw 1 


1 oy / 


OOOl lo 


OOOlO/' 


1 / fjW 






IMS 


Ul 1 
W 1 1 


1 oy c 


0061 CC 


Art/ 7it7 
004/0/^ 


AAOACO 
OO^U^C 




cTOcri • 


ICD 
J on 


or BAfir'i 


1 oy ^ 


0061 c6 




OOcOhO 






ICD 
J OA 


or BArvi 


1 ay 7 


A#%iL.1 TO 
0061 


AX!>777 


AAAAZA 


1 73XZA 




Q r T 


MLh aMTC 

w*»u»an 1 0 


1 oy fi 


006 ivO 


AAI ZAO 

001 •»0c 








DtU 


. ▼© 


1 a/ Q 


0061 *»c 


OOOlOf 








IMD 


CTOTAO 
0 1 A 1 Ur 


1 BCD 


0061 VC> 


A1 D777 


1 77777 

\ f f f 1 1 


1 757X0 

1 1 CJJ\J 




nuv 


if— 1 aoc 




UUDl V* 


MA7T7 


1 75znz 


1 75X5ft 
1 r CJC\J 




HUV 


rmtAAin smtt 
Lunww, VI 1 1 




006lD4£ 


0>c/^ ff 


AAAAI A 








irin aMTr 




nfWLI 7f\ 

0061 rO 


004 ror 


1 T7AA* 
1 f f UOO 






ICO 


or enuA 1 t 




OODl /^H 


ftZOTT? 
\j'*Ci 1 f 


AAAAIiL 
OOUOlO 


1 75XnA 




air 
ox L 


iriA aMTr 
<v io«fln 1 L 




UUDcUc 


AC 07/7 


AAAAAA 






nr c 

Di 0 




P050 


UUDcIU 


fWl1 A7 


1 771 C 3 






IMD 


CTOTAD 
0 1 A 1 Ur 


1 oj/^ 










• no I uF 
, I/Mi vc 


I C AT 

i 0 n 1 


pnT 

CU 1 


lOJO 


VMoc 1 










iWU 






rvu^7>t 










BIS 




1860 


006226 


012702 


013555 




ENDT1: 


MOV 


«nSG24,R2 


1861 


006232 


104404 










TOP 


1 Bit? 


00OcJ*» 


U Ic/^Uc 


V 1 c03*» 






MOV 




1 BAT 

loo J 














TAD 


IoOh 










.•DUMP URJTE 


cop ADC 
CfV\UAO 


IBA^ 
lOOJ 

1 BAA 




\fW*fOf 


AApJtZA 




URTMIP: 


JSR 


or porn 

r L #rA 1 W 


loOO 




U lO/Or 




AAXIilO 




MOV 


DAOAM rUAD 


lOOO 


/WLTCy 




1777*^X 

\ f f f 0 J 






BIC 


«1777i^X THAR 

W I f f f t V AAA 


1 BAO 






ni XXI rt 






MOV 


JMCCI^ R? 

WPlott 1 H , AC 


1 Or w 


UUOcOO 


Uccf Of 








CMP 


jrz ruAR 


1B71 


n<V^37Z, 


fVIIAAp 

«A/ lUUc 








BNE 


• ^0 


1fl75 

lof C. 


<Wv?7A 
UtTOcr O 


m ?7n? 

U 1 cr Uc 


ni x?7n 






MOV 


Mfnou i c .AC 






nP57A7 


nnnnio 


nnxi9A 

(A/ J 1 cO 




CMP 


i«1A ruAp 




0UO3 lU 










BNE 


.♦0 


1 B7C 

(Of > 




Ulc/^Oc 








MOV 




1B7A 


VA/uJ IC 












TAD 


1B77 












MOV 


or r ADA D9 
aCCUKI/ «ac 


iOr O 














l/C trrt 1 






1/ lO' 0/ 




nnxinp 




MOV 


DAfiAM rUAD 






yJHc.fOf 


177717 


nnxn7^ 




BIC 


#177717 rUAR 

W \ f f f If . LnAA 


ISO 1 


\A^j*»c 


M ?7n? 

V \cf\Jc 








MOV 


iM«;l7 R? 
#noU 1 f r At 


loBc 




ft?>7A7 
\3CCiOf 








CMP 


j»OA rUAR 


lOCU 




uv 1 Wc 








BNE 




loO*f 




m ?707 
V 1 c ' vc 


ni XXAS 






MOV 


jMciria pp 


\OOj 




vcc r 0 r 








CMP 


IILC\ rUAD 




006370 


00100? 








BNE 


+6 


1887 


006372 


012702 


013320 






MOV 


«MSG15,R2 


1888 


006376 


022767 


000060 


003032 




CMP 


#60, CHAR 


1889 


006404 


001002 








BNE 


.♦6 


1890 


006406 


012702 


013327 






MOV 


«nSG16,R2 


'891 


006412 


104404 










TOP 



I 3 
PAGE 34 



NO 



SEO 0034 



YES, +1 TO PERMANENT BADSPOT? 

JS READ PASS SELECTED? 

NO 



; BACKSPACE 2 RECORDS 



: SPACE FORWARD 1 RECORD 
.•CHANGE FROM SPACE TO WRITE 

.•INDICATE DRIVE AT EOT 

.•PRINT DRIVE, PATTERN. PARITY, DENSITY 



.-PRINT WRITE MODE 
.•PRINT RECORD Nl/BER 



.•PRINT RECORD LENGTH SEQUENCE 



CZTMCDO TMII DATA RELlAB 
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SEO 0035 



1892 


006414 


A1 ITAO 
\j\Cf\JC 


A1 7TC/ 

01 3334 




nuv 


JMCr^lO D3 


1893 


006420 


1 A/ y Ay 








TOD 




006422 


016702 


i 7*^1 C/ 

1 7^1 34 








"1 one 

1895 


006h26 


1044<:0 








JflJDrUPIf4'3 DO 




006h30 


A1 "^^AA 

OlcfOO 


AAAiLA/ 
000604 




nuv 




006h3h 


1 l<:rO/^ 


AAAAA^A AAZ. 7Cl 

000060 004733 




MTtUR 

nL'vo 




1898 


AA^y / ^ 




AAy 7/ 7 

004747 


mii 1 P 1 . 




«I<r30*17 


1899 


AA^y y ^ 

006446 


003710 






TCT 


aoo 


1900 


006430 


iV\i / AC 

001 403 






DCU 


URTDP 
■n 1 l/c 


1901 


00643<: 


A1 07AO 

01<:70<: 


A1 '<77<L 

0133 70 




nuv 




190^ 


000430 


1 Ay AAy. 
10440*» 








TOP 


1903 


000400 


A1 1 AAD 

01 lOOc 






Mnu 
nuv 


ro) R? 


190h 


0004OC 


iOh*»£0 








L/C I 


1 Wj 


OOOwH 


W3r cU 




IJQTn3 • 


T^T 


\ vy ^ 


IWO 


AA<L/.iLX 

00D4OO 


OcOUc' 


rww^33 




rMP 


n V # Wr\\, n t ^ ^ c w 


190f 


0064 72 


AAi TXT 

001 JOJ 






DklC 
dIMC 


URTD1 


1 908 


0004/4 




1 731 33 




T^T 




1 909 


000300 


AAI AAO 








iC 
1 9 




UU03Uc 


1 U*t*»jO 












000304 


AAA3A7 

OOOcO' 






n 1 o 


pr 
















1 Q1 7 












iMSG?OA R? 


101Z. 
1 7 1 *♦ 


UIA3UD 


U 1 Ci\fC 


01 '^430 


IS- 


MOV 




VAn3 1 c 


104404 








TOP 


1916 


0065K 


016702 


172102 




nov 


PERMBS,R2 


1917 














1910 


0003^0 


lU<»*»cO 








DECPRT 


1919 


0003^^ 


1 AAZ.'^ 

1U4hjO 








CKSU 


19^ 


0003c4 


rtrtA5n7 
UUOcUr 






RTS 


PC 


19cl 














19cc 














19^ J 

1 o?Z 








; GENERATE DATA PETTERN 


1 Vc3 








;ALL PATTERNS HAVE BITS 15,14 


1 QOA 

1 VcO 


UU03cO 


ni A7n3 

U lOf vc 


1 73000 


GENPA: 


MOV 


yBUF,R2 




UU03^£ 


A1 A70T 
U lOf vj 


1 73S74 




MOV 


PARAn,R3 


1Q?B 


UU03jO 


U0U30J 






SUAB 


R3 


I VcV 


UUO>hU 


OUOjOj 






ASL 


R3 




UU03«»£ 


o*»t yuj 


1 777^1 




SIC 


#177741 ,R3 


1 071 


UU03*»0 




UUD33H 




ADO 


/W>ATPNT,R3 


1 OT5 


UU033£ 


A1 1 -lA? 






MOV 


aR3,PC 


1 01T 


UU033«» 


UUOO I** 




PATPNT: 


PATEO 




1 TJH 


UU0330 


UUOOcc 






PATOO 




10'tC 
1 VjJ 


UU030U 


UOOOjU 






PATE1 




1 0TA 


UUD30C 


nn<kA4L 






PAT01 




10T7 




UM)OOv 






PATE2 




10Tfl 
i VjO 


UU0300 


UUDOOC 






PAT02 




1 0XO 


UUD3r V 


01VW^7^ 






PATE3 






um3f c 


OfV^70? 

UUO' VC 






PAT03 




1941 


006574 


006710 






PATE4 




1942 


006576 


006734 






PAT04 




1943 


006600 


006754 






PATES 




1944 


006602 


007002 






PAT05 




1945 


006604 


C'^7032 






PAT6 




1946 


006606 


007032 






PAT6 




1947 


006613 


007040 






PATE 7 





; PRINT 'WIITE ERRORS=" 
.PRINT STATISTICAL RECOVERY 



.-RECOVERED AT X 
.-JUST INCREMENTING 



;SKIP PRINT IF = 0 



.•PRINT 'PERMANENT BADSPOT' 



czTncDO Tnii data reliab 
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U0701 
K0301 
006636 
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SEO 0036 





UOooi c 


rtr>7n7rt 








1 tjU 






It? 1 


UUOO l«» 


\J\Cf\JJ 


1 

1 tOc 


UUdooJ 




1 0CT 






1 










f»1 57nT 

U 1 cf Uj 


ItOO 


UUDOCO 




10C7 






1 TOO 






1 O'vO 


UUDOjU 


ni 57nx 

U 1 c f vj 


1 yc^J 








UUDOjO 


1 A77X7 
1 Of f J» 






1 7S7A7 






1 77T7S 










UUOOh** 


M 57nx 

U Icr 




UUDOjU 




10^7 


umojc 




1 TTOO 


mwojH 


1^5710 
1 hCj I V 




VATOO^O 


1 HUr vc 


io7n 


















1Q7^ 


U\raOOv 




1Q7^ 


lA/DOO** 


nnosi 1 


1Q7S 

1 71 J 






1 T f O 






1077 


VA^OOOO 


ni 5707 


1 Tl O 


UUQOr c 




1979 












1 7D 1 


UUODr 


01 ?705 


10117 


rw^7nn 


nnoso3 








1 /U*f 


(¥V>70P 


013707 


1 tOj 

1 TOO 


UUOr UD 
















UUOr IV/ 


015707 

\J\Cf \JJ 


1 TOT 




1 1 CS\?? 


1000 


umr lO 


VCO r U£ 


1001 






100? 






1 77 J 


\Am CO 


10SP07 


lOQ^ 




W 1 r Or 


100^ 

1 77 J 




000770 








1997 


006734 


005003 


1998 


QO(>7Z<i 


110322 


1999 


006740 


026702 


2000 




001001 


2001 


006746 


000517 


2002 


006750 


005203 


2003 


006752 


000771 



006652 



152725 

165352 

177377 
177701 

000301 
171612 



171570 



PAT07 
.•PATTERN 0 

;HIGH FREQUENCY OUTSIDE SKEW 
PATEO: mM #140701 ,R3 

8R PFILI 
;HALF FREQUENCY OUTSIDE SKEW 



PATOO: MOV 
BR 

.•PATTERN 1 
.•SLIDING 0 
PATE1 : KOV 
BR 

PE1: 167737 
175767 
177375 
.•SLIDING 1 



PAT01 ; 
P01 



MOV 

150340 
142310 
140702 



#140301 .R3 
PFILI 



#PE1.R3 
PFIL3 



*P01.R3 
PFIL3 



;401 



;1 



; 27437 
; 35467 
; 37075 



10040 

2010 

402 



.•PATTERN 2 

.•HIGH FREQUENCY EVERY OTHER TRACK 
PATE2: MOV #1 52725. fi3 ; 12425 
BR PFILI 

.-HIGH FREQUENCY EVERY OTHER TRACK 
PAT02: MOV #165352.R3 ;25052 

BR PFIL1 
.•PATTERN 3 

;HALF FREQUENCY OUTSIDE TRACK. HIGH FREQUENCY INSIDE TRACKS 
PATE3; WV #177377,R3 .37077 
BR PFILI 

.-HIGH FREQUENCY OUTSIDE TRACK. HALF FREQUENCY INSIDE TRACKS 
PAT03: MOV #177701 .R3 .37401 

BR PFILI 
.PATTERN 4 

.INCREMENTING PATTERN (NO ALL O'S) 
PATE4: MOV #301 .R3 
MOVB R3.(2)+ 
CMP f«UF.R2 
BNE .+4 
BR PATEND 
INC6 ft3 
BEQ PATE4 
BR PATE4->^4 
.-INCREMENTING PATTERN (INCLUDING ALL O'S) 



PAT04: 



CLR 

MOVB 

CMP 

BNE 

BR 

INC 

BR 



R3 
R3.(2>* 
R8UF,R2 
.♦4 

PATEND 
R3 

PAT04*2 
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SEO 0037 



2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

20K 

2015 

2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

?039 

2040 

2041 

2042 

2043 

2044 

2045 

2046 

2047 

2048 

2049 

2050 

2051 

2052 

2053 

2054 

2055 

2056 

2057 

2058 

2059 



006754 
006760 
006762 
006764 
006766 
006770 
006772 
006774 
006776 
007000 



007002 
007006 
007010 
007012 
007014 
007016 
007020 
007022 
007024 
007026 
007030 



007032 
007036 



007040 
007044 
007052 
007054 
007U60 
007064 
007066 

007070 
007074 
007100 
007104 
007106 

007110 
007112 
007116 
007120 

007122 
007124 
007130 
007132 
007136 



012703 
000475 
157437 
167737 
167757 
173767 
1 71 767 
171773 
176775 
177376 



012703 
000462 
160340 
150340 
150320 
144310 
142310 
142304 
141302 
140702 
140701 



012703 
000424 



004767 
132767 
001772 
1 16722 
026702 
001365 
000447 

004767 
016722 
026702 
001371 
000437 

010322 
026702 
001374 
000432 

010304 
062704 
012322 
026702 
001001 



006762 



007010 



^77777 



000202 
000077 

000336 
171450 



000152 
000316 
171430 



171416 

000006 
171376 



000344 



.•PATTERN 5 

.■THREE O'S EACH TRACK EVERY 6TH WORD 
PATES: MOV *PE5-R3 
PFIL9 

17437 



PES: 



MOV 
BR 

157437 
167737 
167757 
173767 
171767 
171773 
176775 
177376 



27437 
27457 
33467 
31467 
31473 
37075 
37076 



.•THREE rS EACH TRACK EVERY 6TH WORD 



PAT05: 



P05: 



MOV 
BR 

160340 
150340 
150320 
144310 
142310 
142304 
141302 
140702 
140701 
.PATTERN 6 
;ALL rs ALL TRACKS 



*P05,R3 
PF I L9 



20040 

10040 

10020 

4010 

2010 

2004 

1002 

402 

401 



PAT6: 



PATE7: 



MOV 
BR 

; PATTERN 7 
;RANDOn (NONE ALL 
JSR 
BITB 
BEO 

novB 

C«P 
BNE 
BR 



#-1,R3 
PFIL1 



O'S) 
PC4RAN6EN 
#77«RAND0n 
PATE7 

RBUF.R2 
PATE7 
PATEND 

.'RANDOM (WITH ALL O'S) 
PAT07: JSR PC,RANGEN 
NOV RAND0N.(2)* 
CMP RBUF,R2 
BNE PAr07 
BR PATEND 
.-FILL URITE BUFFER WITH CONSTANT PATTERN 
PFILT: NOV R3.(2)+ 
CMP RBUF,R2 
BNE PFJL1 
BR PATEND 
.-FILL URITE BUFFER WITH 3 WORD PATTERN 
PFIL3: MOV R3.R4 
ADD #6,R4 
PF1L3A: MOV (35*, (2)* 
CMP RBUF,R2 
BNE .+4 
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2060 


0071 40 


000422 




2061 


007142 


020304 




2062 


007144 


001002 




2063 


007146 


162703 


000006 


2064 


0071 52 


000766 




2065 








2066 








2067 


007154 


010304 




2066 


007156 


062 7(K 


000022 


2069 


007162 


01 2322 




2070 


007164 


026702 


1 71 Ty y 

171344 


2071 


007170 


001001 




2072 


0071 72 


000405 




2073 


007174 


020304 




2074 


AA^74 7^ 

007176 


^\i f^\'^ 
001002 




2075 


007200 


162703 


AAAAOO 

00002c 


2076 


007204 


000766 




2077 








2078 








"WTO 




\j5dfof 


AAA1 AA 
000100 


2GS0 


/V\T01 / 

007214 


/v\i y Ay 
001404 




<?0d1 


AAT01 


\jyi7ti7 


OOOcOO 






AA1 AA7 








AlifTAO 

UIO/Uc 




2084 


00rZ3^ 


Ay O'TOO 


1 y ATAA 

1h0300 


2085 


00/dJO 


026 rU2 


1 71 070 

171 2/^c 


^OBo 


\J072hc 


001 JO 




2Qof 




000^0/^ 




20o8 








20oV 








2090 










AA^^/ ^ 
00^^ 


A1 AA^7 
0l006f 


AAA1 CO 

00015c 


2Sf*2 


00^52 


A1 A1 i.'y 


AAA1 CA 

000150 




00r<:5o 




AAA1/.iL 

0001 






A1 ATiL? 


AAA1 
0001 


2\rr3 


OOf c06 


AliCTAA 

01O/UU 


AAA1 OiL 

0001 cO 


^096 




AlZ.'TAI 

016AJ1 


AAA1 oy 

0001 c<» 


"WIT 


\jOf27b 


A1 OTAT 

012703 


AAAAA7 

00000/^ 


£srfo 




U05UU£ 




cSfrf 




aa^t/Sa 








AA^1 A1 




<: lOi 


A/rm A 


AA^I AO 

006102 






AATTI O 


005 jOj 




'51 AT 


OOOlH 


001 JO 




•51 Ay 


AA7X1Z. 


ooo/uu 


AAAA7il 

0000/^0 


01 AC 

^•05 


WfScc 


005501 




"51 A^ 




A^XTAI 

oooA;i 


AAAA70 
0000 /^C 


•51 A7 




AACCAO 

00550c 




01 AS 




ODcAJO 


AA1 AC7 
00105/^ 






\fSJJJ\l 1 




2110 


007340 


005502 




2111 


007342 


062701 


047401 


2112 


007346 


005502 




2113 


007350 


062702 


000006 


2114 


007354 


060200 




2115 


007356 


005501 





SEO 0038 



BR 

CMP 

BNE 

SUB 

BR 



PATEND 
R3.R4 
.♦6 
*6,R3 

PF I L3A 



PFJL9A: 



.'FILL yRJTE BUFFER WITH 
PF I L9: MOV 
ADD 
MOV 
CMP 
BNE 
BR 
CMP 
BNE 
SUB 
BR 



172116 PATEND: 



9 WORD PATTERN 

R3-R4 
*22.R4 
(3)*.(2>* 
R8UF.R2 
.♦4 

PATEND 
R3.R4 
.♦6 

#22, R3 
PF JL9A 

.-FINISHED PATTERN GENERATION 

;IF CORE Dlf»> NOT SELECTED CLEAR BITS 15,14,7,6 IN ALL WORDS OF WRITE DATA BUFFER 



172106 



PATEN; 
PATEN1 



PATEN2: 



BIT #100,PARAM 

BEO PATEN 

BIT #200,PARAH 

BNE PATEN2 

MOV UBUF,R2 

BIC #140300, (2)* 

CMP RSUF,R2 

BNE PATEN1 

RTS PC 



IS CORE Dl#f» SET? 
NO 

MArBE, IS CORE Ol#»> SET? 

YES 

NO 

CLEAR BITS 15,14,7,6 

DONE ALL? 

NO 



.-RANDOM MfCER GENERATOR 
:EXJT WITH RANDOM NlfCER IN 



RAN6EN: 



RAN61: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
ASL 

Ra 

ROL 
DEC 
BNE 
ADD 
ADC 
ADD 
ADC 
ADD 
ADC 
ADC 
ADD 
ADC 
ADD 
ADD 
ADC 



RO,SVO 
R1 ,SV1 
R2,SV2 
R3,SV3 
LONl#f,RO 
HJNLfl,R1 
#7,R3 
R2 
RO 
R1 
R2 
R3 

RAN61 

L0NIM,R0 

R1 

HJNW,R1 
R2 

#1 057.ro 

R1 

R2 

#47401 ,R1 
R2 

#6,R2 
R2,R0 
R1 



LOCATION NAMED 'TlANDOM" 
:SAVE REGISTERS 



;SET UP LOW DIGIT 
:SET UP HIGH DIGIT 
;SET UP SHIFT COUNT 

SHIFT RO LEFT AMD 

ROTATE CARRY INTO LSB OF R1 AND 

ROTATE CARRY OUT OF R1 INTO R2 

DECROtBi: R3 

CONTINUE SHIFT LOOP 

ADD MfBEft TO MAKE X 129 

PROPAfiATE CARRY 

ADD MfCER TO HAKE X 129 

PROPAGATE CARRY 

ADD LOU CONSTANT 

PROPAGATE CARRY 

PROPAGATE CARRY 

ADD HIGH CONSTANT 

PROPAGATE CARRY 

ADD HIGH CONSTANT 

RE-PRIME RO WITH HIGH DIGIT 

PROPAGATE CARRY 



CZIMCDO TMII DATA RELIAB 
CZmCD.PIl 03-JUN-80 15:26 



N 3 

MACYll 30A(1052) 03-JLW-80 15:27 PAGE 



2116 

2117 

2118 

2119 

2120 

2121 

2122 

2123 

2124 

2125 

2126 

2127 

2128 

2129 

2130 

2131 

2132 

2133 

2134 

2135 

2136 

2137 

2138 

2139 

2U0 

2141 

2142 

2143 

2144 

2145 

2146 

2147 

2148 

2149 

2150 

2151 

2152 

2153 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2163 

2164 

2165 

2166 

2167 

2168 

2169 

2170 

2171 



007360 
007364 
007370 
007374 
007400 
007404 
007410 
007414 
007416 
007420 
007422 
007424 
007426 
007430 
007432 



010067 
010067 
010167 
016700 
016701 
016702 
016703 
000207 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



000032 
000030 
000026 
000024 
000022 
000020 
000016 



RANDOM: 
LONUM: 

SVO: 
SV1 
SV2 
SV3 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

RTS 

0 

0 

0 

0 

0 

0 

0 



RO. RANDOM 

RO.LONUM 

R1.HINUM 

SVO.RO 

SV1,R1 

SV2.R2 

SV3.R3 

PC 











;REAO RECORD 




007434 


005 r or 


1 r ilOH 




READI : 


TST 




007440 


001003 








BNE 


SR1 


007hA2 


OlOf Of 


1 71 1 

1 r 1 lUo 


1 71 1 75 




MOV 


STRLEN.READLN 


007h50 


OlCf Of 


1 7777Q 


1 71 1 1 


SRI: 


MOV 


#-3,RDPASS 




Alit.777 


171 in5 


1 r lU lO 


RDSTPD: 


MOV 


COnAND.aMTC 




1 AC777 


1 71 rtl D 






TSTB 


aMTC 


WfHf\J 


1 AA77C 








BPL 


.-4 


WfHfC 


<VKLrt77 

UUDUf f 


i7inrt5 






ROR 


aMTS 


wrHfO 


1 ATT7C 








BCC 


.-4 


wfjW 


m A7fm 
UlOrUU 


i7iftTn 




READ60: 


nov 


RBUF.RO 




UlOrUl 


1 r 1 1 jc 






nov 


READLN.R1 


UUOlU 








RG1: 


CLRB 


(0) + 


/V>7d O 










DEC 


R1 




rtrti 77^ 








BNE 


R61 




016777 


1 71 1 20 


170760 




MOV 


READLN.iBC 


007524 


005477 


170754 






NEC 


ec 


007530 


016777 


171000 


170750 




MOV 


RBur.acA 


007536 


016777 


171022 


170736 




MOV 


corwD.aNTC 


007544 


052777 


000002 


170730 




BIS 




007552 


004767 


175424 






JSR 


PCGOUAIT 






.•RETURN 


HERE 


AFTER INTERRUPT 


007556 


017767 


170716 


171014 


NOV 


aMTS^STATRD 


007564 


005777 


170712 






TST 


aMTC 


007570 


100504 








BMI 


ROERRO 








.-CHECK FOR DATA EWtORS 


007572 


016700 


170736 






NOV 


RBUF.RO 


007576 


016701 


170730 






MOV 


UBUF«R1 


007602 


016702 


171034 






MOV 


READLN.R2 

(0)+.(1)* 


007606 


022021 






SR5: 


CMP 


007610 


001045 








BNE 


DATERR 


007612 


162702 


000002 






SUB 


f2,R2 
$R5 


007616 


001373 








BNE 


007620 


032767 


000003 


171504 


RTSSTP: 


BIT 


#3,PARAM 


007626 


001007 








BNE 


ROSTPC 


007630 


004767 


000274 






JSR 


PC.RDINCR 


007634 


026767 


170764 


170766 




CMP 


RECORD.LASRCR 


007642 


001316 








BNE 


READGO 


007644 


000207 








RTS 


PC 



39 



SEQ 0039 



SAVE RANDOM NUMBER 
PUT RO BACK IN LONUM 
PUT Rl BACK IN HJNLfl 
RESTORE REGISTERS 



.'EXIT 



.•FIRST RECORD? 
:N0 

;SET INITIAL READ LENGTH 
.•INITIALIZE READ PASS COUNTER 

;UAIT FOR CONTROL UNIT READY 
.•WAIT FOR TAPE UNIT READY 

.-CLEAR READ BUFFER 

.-SET BYTE COUNT 
;SET CURRENT ADDRESS 



.-ANY STATUS ERRORS 
;YES 



CHECK FOR PROPER DATA TRANSFER 
HAVE DATA ERROR 
CHECKED ALL TRANSFERS? 
NO 



.•INCREMENT FOR NEXT BLOCK 



.•EXIT READI T 
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?172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 

2181 

2182 

2183 

2184 

2185 

2186 

2187 

2188 

2189 

2190 

2191 

2192 

2193 

2194 

2195 

2196 

2197 

2198 

2199 

2200 

2201 

2202 

2203 

2204 

2205 

2206 

2207 

2208 

2209 

2210 

2211 

2212 

2213 

2214 

2215 

2216 

2217 

2218 

2219 

2220 

2221 

2222 

2221 

222^ 

2225 

2226 

2227 



007(M> 
007654 
007656 
007662 
007670 
007674 
007676 
007700 
007704 
007706 
007712 
007720 
007722 

007724 
007732 
007734 
007740 
007742 
007750 
007754 
007756 
007760 
007762 
007764 
007772 
007774 
010000 

010002 
010010 
010012 
010020 
010022 
010026 
010030 
010036 

010042 
010050 
010052 
010056 
010064 
010066 
010072 
010074 
010100 
010104 
010110 
010116 
010124 
010126 

010130 
010134 
010140 



032767 
001414 
004767 
052767 
012704 
005204 
001376 
005267 
001371 
004767 
026767 
001256 
000207 

032777 
001014 
012702 
104404 
016767 
004767 
014102 
104412 
014002 
104412 
022767 
001002 
005267 
000426 

032767 
001515 
032777 
001010 
012702 
104404 
016767 
004767 

022767 
001002 
005267 
032777 
001011 
005267 
001404 
004767 
000167 
005267 
012767 
032767 
001054 
000667 

005267 
005767 
001416 



000002 

177364 
177400 
177470 



177512 

000216 
170706 



020000 

013006 

170674 
001066 



177775 
170634 

175600 

020000 

012761 

170606 
001000 

177775 

170554 
000020 

170500 

000100 
177352 
170526 
177775 
002000 



170470 
170436 



171456 RDSTPC: BIT 
BEQ 

RNORDS: JSR 
177526 BIS 

RN0S1 : MOV 
INC 
BNE 
INC 
BNE 

RDSTP: JSR 
CMP 
BNE 
RTS 

.■HAVE DATA ERROR 



170710 

170560 DATERR 
170606 

1 70600 DATER1 



170570 
170472 

170520 
170522 
170426 



170454 
170454 



BIT 
BNE 
MOV 
TOP 
MOV 
JSR 
MOV 

MOV 

CMP 
BNE 
INC 
BR 



*2,PARAM 
RDSTP 
PC-RANGEN 
*1 77400, RANDOM 
#-200. ,R4 
R4 
.-2 

RANDOM 
RNDS1 
PC, RD I NCR 
RECORD.LASRCR 
RDSTPD 
PC 

I 

#20000, asuR 

DATER1 
#MS69A,R2 

READLN, LENGTH 

PC.PRTS 

-(1),R2 

OCTPRT 

-(0),R2 

OCTPRT 

#-3,RDPASS 

.♦6 

DAERRS 
RTSR1 



:IS READ MODE RANDOM? 
:N0 



.-DELAY 1 MILLISECOND 



.-DONE LAST RECORD? 
;N0 

;YES EXIT 

.-TYPE ALL READ ERRORS? 
;N0 



;PRINT rXPECTED DATA 



.PRINT ACTUAL DATA 



;*1 TO DATA ERRORS 



.•STATUS INDICATES AN ERROR. CHECK FOR EOT 



RDERRO: BIT #1 75600, STATRD 
BEQ RNDTAP 
BIT #20000,aSUR 
BNE RTSREC 
MOV #nSG9.R2 
TOP 

MOV READLN, LENGTH 
JSR PC.PRTS 
;+ 1 TO RDERRS IF FIRST ERROR PASS 



;IS ERROR LEGITIMATE OR EOT? 
.-HAVE EOT 

.•TYPE ALL READ ERRORS? 
;N0 



.•PRINT ERROR 



RTSREC; 



RTSR1 ; 



#-3,RDPASS 
.♦6 

RDERRS 
fPO.aSUR 

RPASS3 
RDPASS 
RPASS1 
PC,8ACK1 
RDSTPD 

RPASS1: INC NRREAD 
RPASS3: MOV #-3.RDPASS 

BIT /r2000-STATRD 
BNE RNDTP1 
BR RDSTP 
;SET UP POINTERS FOR NEXT RECORD 
RDINCR: INC RECORD 
TST BLKINC 
BEQ RESTR1 



CMP 
BNE 
INC 
BIT 
BNE 
INC 
BEQ 
JSR 
JMP 
INC 



;*1 TO STATUS ERRORS 

.•DELETE READ RETRYS (SW 4) 

;YES 

.-DONE ALL RE-READS? 

;YES 

;N0. BACKSPACE TAPE 
;60 AGAIN 

:*^ TO NONRECOVERABLE READ 
;AT EOT? 

;YES. TYPE 'tOT" 
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SEQ 0041 



2228 

2229 

2230 

2231 

2232 

2233 

2234 

2235 

2236 

2237 

2238 

2239 

2240 

2241 

2242 

2243 

2244 

2245 

2246 

2247 

2248 

2249 

2250 

2251 

2252 

2253 

2254 

2255 

2256 

2257 

2258 

2259 

2260 

2261 

2262 

2263 

2264 

2265 

2266 

2267 

2268 

2269 

2270 

2271 

2272 

2275 

2271, 

2275 

2276 

2277 

2278 

2279 

2280 

2281 

2282 

2283 



010142 
010150 
010156 
010160 
010166 
010170 
010176 



010200 
010204 
010206 
010214 
010222 
010230 
010234 
010242 

010244 
010250 
010256 
010262 
010264 
010270 



010276 
010304 
010312 
010316 
010324 
010326 
010332 
010340 
010342 
010346 
010350 
010354 
010356 
010364 
010372 
010376 
010404 
010406 
010412 
010420 
010422 
010426 
010434 
010436 
010442 
010444 
010450 



066767 
026767 
002404 
026767 
003403 
016767 
000207 



006077 
103375 
012777 
016777 
052777 
004767 
042777 
000207 

004767 
052767 
012702 
104404 
012702 
104404 



010272 004767 



016767 
042767 
012702 
022767 
001002 
012702 
022767 
001002 
012702 
104404 
016702 
104426 
016767 
042767 
012702 
022767 
001002 
012702 
022767 
001002 
012702 
022767 
001002 
012702 
104404 
012702 
104404 



170430 
170466 

170456 

170360 



170472 
170352 

170340 

170444 



.-RECORD LENGTH IS CHANGING, COUNT IT 



RESTRL: 
RESTRl : 



ADD BLKINCREADLN 

HIP READLN.niNLEN 

BLT RESTRL 

CMP READLN.MAXLEN 

BLE RESTRl 

nOV STRLEN^REAOLN 

RTS PC 



170274 




BACK1: 


ROR 








see 


-[77777 


170270 




nov 


170344 


170260 




MOV 


000012 


170252 




BIS 


174746 






JSR 


000016 


170240 




BIC 








RTS 






.DRIVE 


HAS 1 


177660 




RNDTAP: 


JSR 


000020 


170366 




BIS 


013620 




RNDTP1 ; 


MOV 


012654 






MOV 



.■BACKSPACE ONE RECORD 

— aMTS 

.-4 

#-1.aBC 

COMi^ND.aMTC 

/ri2,aHTC 

PC.GOWAIT 

/ri6,aMTC 

PC 



IS LENGTH LESS THAN MINIMUM 
NO 

IS LENGTH GREATER THAN MAXIMl/1? 
NO 

RESET INITIAL LENGTH 



UAIT FOR TAPE UNIT READY 
COUNT 1 RECORD 
SELECT DRIVE 
ISSUE BACKSPACE 



:DUnP ERROR 



000610 




READMP: JSR 


171030 


001132 


MOV 


177774 


001124 


BIC 


013310 




MOV 


000001 


001112 


CMP 






BNE 


013270 




MOV 


000002 


001076 


CMP 






BNE 


013300 




MOV 


170250 




MOV 






DECPRT 


170750 


001052 


MOV 


177717 


001044 


BIC 


013336 




MOV 


000020 


001032 


CMP 






BNE 


013345 




MOV 


000040 


001016 


CMP 






BNE 


013320 




MOV 


000060 


001002 


CMP 






BNE 


013327 




MOV 


013450 




MOV 



EACHEO EOT IN 
PC-ROINCR 
#20,M0DES 
imSG25«R2 
TOP 

mSG8.R2 
TOP 
COUNTERS 
PC.PRTO 



PARAM.CHAR 
#177774. CHAR 
MnSG14.R2 
#1.CHAR 
.♦6 

*HSG12,R2 
#2. CHAR 
.♦6 

«nS613,R2 
TOP 

REC0RD,R2 

PARAM.CHAR 
#17771 7. CHAR 
#HS617.R2 
#20, CHAR 
.+6 

#MSG18.R2 
#40. CHAR 
.+6 

#MSG15.R2 
#60. CHAR 
.♦6 

#MSG16.R2 

TOP 

#MSG21.R2 

TOP 



READ HODE 



.•INDICATE AT EOT 



.•PRINT DRIVE, PATTERN. PARITY, DENSITY 



; PR I NT READ MODE 
.•PRINT RECORD NUMBER 



.•PRINT RECORD LENGTH SEQUENCE 
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S£0 (XK2 



2284 

2285 

2286 

2287 

2288 

2289 

2290 

2291 

2292 

2293 

2294 

2295 

2296 

2297 

2298 

2299 

2300 

2301 

2302 

2303 

2304 

2305 

2306 

2307 

2308 

2309 

2310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2338 

2339 



010452 
010456 



010460 
010464 
010466 
010472 
010474 
010500 
010502 
010506 
010510 
010512 



010514 
010522 
010530 
010532 
010536 
010542 
010544 
010552 
010560 
010566 
010572 
010600 
010604 
010606 



010612 
010620 
010624 
010626 
010632 
010634 
010642 
010644 
010650 

010652 
010656 
010660 
010666 
010672 
010676 
010700 
010706 
010710 



016702 
104426 



012702 
104404 
016702 
104426 
012702 
104404 
016702 
104426 
104436 
000207 



012767 
032777 
001036 
004767 
105777 
100375 
016777 
052777 
016777 
005477 
016777 
006077 
103375 
004767 



017767 
005777 
100403 
005067 
000207 
032767 
001771 
005267 
001324 

012702 
104404 
016767 
004767 
012702 
104404 
032767 
001702 
042777 



170154 

013500 
170142 
013521 
170130 



177774 
000040 

177442 
167740 

170014 
000014 
170054 
167712 
167734 
167674 

174370 



167662 
167656 

167742 

175600 

167724 

012626 

167754 
000150 
013242 

002000 

000016 



MOV RDERRS.R2 
DECPRT 



MOV 

MOV 

DECPRT 

MOV 

MOV 
DECPRT 
CKSW 
RTS 



mSG22,R2 
TOP 

DAERRS.R2 

*MS623.R2 
TOP 

NRREAD,R2 



PC 



170052 
167762 



167730 
167722 
167716 

167706 



167760 



167736 



WRITE RECOVERY UTILIZING EXTENDED INTERRECORD GAP 
USED AFTER EVERY 7 REWRITES OR AFTER 
EACH WRITE ERROR IF STATISTICAL RECOVERY NOT SELECTED 
USED ONLY IF READ PASS SELECTED 



XRGREC: 
XR60: 



MOV 

BIT 

BNE 

JSR 

TSTB 

BPL 

MOV 

BIS 

MOV 

NEG 

MOV 

ROR 

BCC 

JSR 



<f-4,WRPASS 

#40,aSWR 

XRGRCD 

PCBACKI 

aWTC 

.-4 

COMAND^aMTC 

#14,aMTC 

WRTLEN^aeC 

aec 

WBUF,aCA 

anTs 

.-4 

PCGOWAIT 



.•RETURN HERE AFTER INTERRUPT 



MOV 
TST 
BMI 

XRGRCD: CLR 
RTS 

XRG5; BIT 
BEQ 
INC 
BNE 



aWTS.STATRD 

anTc 

XRG5 

WRPASS 

PC 

#1 75600, STATRD 
XRGRCD 
WRPASS 
XRGO 



.•COUNT 4 REWRITES 

.-DELETE WRITE XIRG (SW 5) 

;YES 



.•WRITE XIRG 
;SET BYTE COUNT 

:SET CURRENT ADDRESS 
.•WAIT FOR TU READY 



;SAVE STATUS 

.-HAVE ERROR FUG. CHECK FOR EOT 

.-EXIT WRITE XIRG 

;ONLY EOT, EXIT 

.-DONE 4 XIRG 



.•PRINT STATUS AFTER 4 XIRG ERRORS 



167670 

167672 
167564 



MOV /mSQ7,R2 
TOP 

MOV URTLEN. LENGTH 
JSR PC.PRTS 
MOV *MSG11.R2 
TOP 

BIT #2000.STATRD 
BEQ XRGREC 
BIC /ri6,aMTC 



PRINT WRITE STATUS ERROR 

PRINT STATUS. COWAND, RECORD. LENGTH 

PRINT '^IRG WRITTEN 4 TIMES" 
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SEO 0(K3 



2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2348 

2349 

2350 

2351 

2352 

2353 

2354 

2355 

2356 

2357 

2358 

2359 

2360 

2361 

2362 

2363 

2364 

2365 

2366 

2367 

2368 

2369 

2370 

2371 

2372 

2373 

2374 

2375 

2376 

2377 

2378 

2379 

2380 

2381 

2382 

2383 

2384 

2385 

2386 

2387 

2388 

2389 

2390 

2391 

2392 

2393 

2394 

2395 



010716 
010724 
010730 



010732 
010740 
010746 
010750 
010754 
010756 
010764 
010772 
010776 
011004 
011010 
011012 
011016 
011020 
011026 
011034 
011040 

011042 
011046 
011050 
011054 
011056 
011062 
011064 
011070 
011072 
011074 
011100 
011102 
011104 



011106 
011114 
011120 
011126 
011134 
011140 
011142 
011150 
011154 
011160 
011166 
011174 
011200 
011202 
011210 
011214 
011222 
011230 



052777 
004767 
000207 



016767 
016767 
001003 
004767 
000207 
016777 
166777 
005477 
016777 
105777 
100375 
006077 
103375 
042777 
052777 
004767 
000207 

012702 
104404 
017702 
104412 
016702 
104412 
016702 
005202 
104426 
016702 
104426 
104436 
000207 



016767 
000367 
142767 
052767 
004767 
104430 
016767 
000367 
006067 
042767 
052767 
004767 
104430 
016767 
000367 
042767 
052767 
004767 



167452 
000316 
000170 
000260 
000300 

170164 
000262 
000256 
000170 
000260 
000240 

170124 
000222 
000176 
000260 
000204 



000003 


167556 


BIS 


*3,aMTC 


.WRITE AN EOF 


174252 




JSR 


PC.GOWAIT 






RTS 


PC 








;60 BACKWARD ON 


TAPE X RECORDS 




167666 


167670 


60BKWD: NOV 


RECORD.LASRCR 




167662 


167656 


nov 


yRRECR, RECORD 




BNE 


GOBI 


;IS NEW RECORD=0 


1 74032 




JSR 


PC, REWIND 


; YES, REWIND 




RTS 


PC 


;£XIT 


167646 


167520 


GOBI : nov 


LASRCR.aBC 


;SET BYTE COUNT ^0 DIFFERENCE 


167636 


167512 


SLB 


URRECR.aBC 


.'BETWEEN LASRCR AND WRRECK 


167506 




NEG 


aBC 




167562 


167476 


MOV 


con^.aMTC 




167^72 




TSTB 


aMTC 


;WAIT FOR CU READY 






BPL 


.-4 




167462 




ROR 


iMTS 


;WAIT FOR TU READY 




BCC 


.-4 




000016 


167454 


BIC 


#16,aMTC 




000012 


167446 


BIS 


#12,iMTC 




174142 




JSR 


PCGOUAIT 








RTS 


PC 








; PRINT COPflAND, 


STATUS, RECORD 


NLnBER, LENGTH 


01 3031 




PRTS: MOV 


#nSG9B,R2 










TOP 




167426 




MOV 


anTC,R2 








OCTPRT 






167516 




MOV 


STATRD,R2 








OCTPRT 






167534 




MOV 


nc CURD, He 








INC 


R2 








DECPRT 






167456 




MOV 


LENGTH, R2 








DECPRT 










CKSW 










RTS 


PC 





000322 PRTD 

000310 
000302 



000266 



.PRINT DRIVE, PATTERN, PARITY, DENSITY 
C0MAND,CHAR 
CHAR 

#170, CHAR 
#260, CHAR 

PC.OCTP .PRINT DRIVE NlfBER 



000250 
000242 



000226 

000214 
000206 



MOV 
SUAB 
BICB 
BIS 
JSR 
SP3 
MOV 
SUAB 
ROR 
BIC 
BIS 
JSR 
SP3 
MOV 
SUAB 
BIC 
BIS 
JSR 



PAAAM, CHAR 

CHAR 

CHAR 

#170, CHAR 
#260. CHAR 
PCOCTP 

PARA«,CHAR 
CHAR 

#176, CHAR 
#260, CHAR 
PCOCTP 



; PRINT PATTERN NUQER 



; PRINT PARITY 



CZTMCDO TM11 DATA RELIA8 
CZTMCD.P11 03-JUN-80 15:26 



2396 

2397 

2398 

2399 

2400 

2401 

2402 

2403 

2404 

2405 

2406 

2407 

2408 

2409 

2410 

2411 

2412 

2413 

2414 

2415 

2416 

2417 

2418 

2419 

2420 

2421 

2422 

2423 

2^24 

2425 

2426 

2427 

2428 

2429 

2430 

2431 

2432 

2433 

2434 

2435 

2436 

2437 

2438 

2439 

2440 

2441 

2442 

2443 

2444 

2445 

2446 

2447 

2448 

2449 

2450 

2451 



MACYll 30A(1052) 03-JUN-80 
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SEO 0044 



011234 


016767 


170072 


000174 




MOV 


PARAM.CHAR 
#177«»77,CHAR 


011242 


042767 


yn^n 


000166 




BIC 


011250 


012702 


013663 






MOV 


«nSG26,R2 


011254 


022767 


000100 


000154 




CMP 


Ml AA /* 1 1 A A 

#100, CHAR 


011262 


001002 








BNE 


.♦6 

*MSG27.R2 


011264 


012702 


013673 






MOV 


011270 


022767 


000200 


000140 




CMP 


#200. CHAR 


011276 


001002 








BNE 


• ■♦•6 

/l'nSG28,R2 


011300 


012702 


013703 






MOV 


011304 


022767 


000300 


000124 




CMP 


JiV AA ^ 1 ■ A A 

#300, CHAR 


011312 


001002 








BNE 


.♦6 

#f1SG27,R2 


011314 


012702 


013713 






MOV 


011320 


104404 








TOP 




011322 


104436 








CKSW 




011324 


000207 






.•PRINT 


RTS 
OCTAL 


PC 

VALUE IN REGISTI 


011326 


012767 


AAA A^ A 

000060 


AAA 4 A^ 

000102 


OCTPR: 


MOV 


# OfCHAR 


011334 


005702 








TST 


R2 


011336 


100003 








BPL 


A/" T 1 

OCT! 

#'1.CHAR 


011340 


012767 


AAAAy ^ 

000061 


000070 




MOV 


011346 


004767 


AAAA^ ^ 

000066 




OCTl : 


JSR 


A^ A^^n 

PC, OCTP 


011352 


4 A^ 

006102 








ROL 


R2 


011354 


006102 








ROL 


R2 


011356 


/\4 '^9^ 9 

012767 


1 77775 


000050 




MOV 


#-5, OCT 


011364 


006102 






A^ T 1 - 

0CT2: 


ROL 


R2 


011366 


006102 








AAI 

ROL 


R2 


011370 


4 A^ 

006102 








AAI 

ROL 


bO 

R2 


011372 


A4 A^Z9 

010267 


000040 






MAk# 

MOV 


bO /"ljad 
R^.CHAK 

m\f f f /^O.CHAR 


M4 4 

011376 




1 7777\j 


000032 




BlC 


A4 4 £ 

011404 


052767 


000060 


AAAAI/ 

000024 




BIS 


#oO,CHAk 


011412 


AA^ 

006002 








AAA 

ROR 


bO 

R2 


011414 


AA/ 9 

004767 


AAAA^A 

000020 






t ^ A 

JSR 


A^ A^TB 

PC, OCTP 


011420 


006102 








AAI 

ROL 


A^ 

R2 


011422 


AAr 9 

005267 


AAAAA^ 

000006 






INC 


OCT 


OllHCO 












UL 1 c 


011430 


104430 








SP3 




011432 


000207 








RTS 


PC 


011434 


000000 






OCT: 


0 




011436 


000000 






CHAR: 


0 




011440 


105777 


167056 




OCTP: 


TSTB 


aTPS 


011444 


100375 








BPL 


.-4 


011446 


016777 


\rrrfA 


167050 




MOV 


CHAR,aTP6 


011454 


000207 








RTS 


PC 



INITIALIZE 1ST NLMBER AS 0 
IS VALUE POSITIVE 
YES PRINT 0 
NO PRINT 1 



.•COUNT 5 DIGITS 



.SAVE DIGIT 
.CLEAR OTHER BITS 
;nAKE ASCII DIGIT 

.-PRINT 

TO DIGIT COUNT 
;NOT DONE 

.•EXIT 



.-WAIT FOR READY 
.•PRINT 











;PRINT 


DECIMAL 


VALUE IN REGISTER 2 


011456 


012767 


177773 


000150 


DECPR: 


MOV 


#-5,DIGCNT 


011464 


012767 


011642 


000146 




MOV 


#0ECPNT+2,DECPNT 


011472 


012767 


000040 


000136 




MOV 


#40, ZERO 


011500 


012767 


\mrr 


000124 


TYPT1: 


MOV 


#-1 .DIGIT 


011506 


005267 


000120 




TYPT2: 


INC 


DIGIT 


011512 


167702 


000122 






SUB 


aDECPNT.R2 


011516 


100373 








BPL 


TYPT2 


011520 


067702 


000114 






ADD 


aDECPNT.R2 



CZTMCDO TMII DATA RELIA8 
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2A52 


011524 


004767 


000022 




2453 


011530 


005267 


000100 




2454 


011534 


001002 






2455 


011536 


104430 






2456 


011540 


000207 






2457 


011542 


062767 


000002 


000070 


2458 


011550 


000753 






2459 


011552 


005767 


000054 




2460 


011556 


001010 






246T 


011560 


022767 


M7177 


000046 


2462 


011566 


001404 






2463 


011570 


016767 


000(y»2 


000034 


2464 


011576 


000406 






2465 


011600 


012767 


000060 


000030 


2466 


011606 


052767 


000060 


000016 


2467 


011614 


105777 


166702 




2468 


011620 


100375 






2469 


011622 


016777 


000004 


166674 


2470 


011630 


000207 






2471 


011632 


000000 






2472 


011634 


000000 








011636 


000040 






2474 


011640 


011642 






2475 


011642 


023420 






2476 


011644 


001750 






2477 


011646 


000144 






2478 


011650 


000012 






2479 


011652 


000001 






2480 
2481 


011654 


105777 


166636 




2482 


011660 


100375 






2483 


CI 1662 


105777 


166634 




2484 


011666 


100375 






2485 


011670 


117777 


166624 


166626 


2486 


011676 


117767 


166616 


167422 


2487 


011704 


042767 


000200 


167414 


2488 


011712 


000207 






2489 










2490 


011714 


012702 


01 1 724 




2491 


011720 


104404 






2492 


011722 


000207 






2493 


011724 


020057 


020040 


057 


2494 




011732 






2495 










2496 










2497 










2498 


011732 


142777 


000177 


166562 


2499 


011740 


112267 


000100 




2500 


011744 


121267 


000074 




2501 


011750 


001003 






2502 


011752 


005067 


166570 




2503 


011756 


000207 






2504 


011760 


121227 


000100 




2505 


011764 


001406 






2506 


011766 


105777 


166530 




2507 


011772 


100375 









JSR 


PC. DECOUT 




INC 


DI6CNT 




BNE 


TYPT3 




SP3 






RTS 


PC 


TYPT3: 


ADD 


#2.DECPNT 




BR 


TYPT1 


DECOUT: 


TST 


DIGIT 




BNE 


DEC1 




CMP 


#-1 .DIGCNT 




BEQ 


DEC1 




MOV 


ZERO, DIGIT 




BR 


DEC2 


DEC1 : 


MOV 


#60, ZERO 




BIS 


#60, DIGIT 


DEC2: 


TSTB 


aTPS 




BPL 


.-4 




MOV 


DIGIT, aTPB 




RTS 


PC 


DIGIT: 


0 




DI6CNT: 


0 




ZERO: 


40 




OECPNT : 


.♦2 






10000. 






1000. 






100. 






10. 






1. 





.-KEYBOARD INPUT 
WAITK: TSTB 
BPL 
TSTB 
BPL 
MOVB 
MOVB 
6IC 
RTS 

.TYPE 3 SPACES 
SP3X: MOV 



SP3A: 



RTS 

.ASCII 

.EVEN 



aTKS 
.-4 

aTPS 

.-4 

aTKB.aTPB 
aTKB, CHARIN 
#200,CHARIN 

PC 

#SP3A,R2 

TOP 

PC 

;/ /; 



.-TELETYPE OUTPUT PACKAGE 



TO: 
TOPI: 
T0P3: 



61 CB 
MOVB 
CMPB 
BNE 
CLR 
RTS 
CMPB 
BEQ 
TSTB 
BPL 



#177.aTPS 
(2)*,E0MK 
aR2.E0MK 
.♦10 
RDSW 
PC 

aR2,#'a 

T0P2 

aTPS 

.-4 



45 



SEO 0045 



:UAIT FOR KEY 

:UAIT FOR TELEPRINTER READY 
.•ECHO CHARACTER 

.-SAVE IT 
.•EXIT 



CLEAR TELETYPE FLAGS 
SAVE MESSAGE DELIMETER 

IS CHARACTER THE SECOND MESSAGE DELIMITER? 
NO 

YES, EXIT 

IS CHARACTER AN a WHICH INDICATES A CARRIAGE RET. 
YES 

NO. WAIT FOR TELETYPE READY 



CZTMCDO TMII DATA RELlAB NACY11 30A(1052) 03-J 
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2508 


01 1 774 


112277 


166524 






nov8 


2509 


012000 


000761 








BR 


2510 










.CARRIAGE RETUf 


2511 


012002 


105777 


166514 




T0P2: 


TST8 


2512 


012006 


100375 








BPL 


2513 


012010 


11 277y 


000215 


1 66506 




M0V8 


25K 


01 2016 


105777 


i X^ C A/^ 

166500 






TST8 


2515 


01 dOdc 


1 AAT7C 
1003^5 








BPL 


2516 


012024 


\\dfff 


AAA01 O 

000<: i<: 


1 XX/ 70 




MOVB 


2517 


012032 


1 ACOAO 

105202 








INCB 


2518 


012034 


1 AC 7^ 7 

105 /^6/' 


166506 






TSTB 


2519 


012040 


100744 








BMJ 


2520 


01 2042 


000740 








BR 


2521 


01 2044 


/\/\/\AAA 

000000 






EOMK: 


0 


2522 














2523 




























2525 


01 20ho 


T7y 

013r4o 


OOOvOo 




SUSWR : 


MOV 


2526 


01 c052 


AI T7y z 

013^46 


AAAAAy 

000004 






MOv 


2527 


01 c056 


A1 07T7 


A1 0A7X 

OlcOro 


000004 




riov 


2528 


012064 


A00777 


1 77777 


1 xxy OA 
16o4^0 




CMP 


2529 


012072 


/VM y AO 

00140<i 








BEQ 




A1 


n/w A7 
00040 r 








BR 




Oic07o 








1$: 


CMP 


2532 


01 21 00 


012767 


000176 


166404 


2>: 


nov 


2533 


012106 


012767 


000174 


166400 




MAI/ 

HOV 


253^ 


A1 H 1 / 


A-l 0X17 

01<:o3y 


000004 




3>: 


nov 


2535 


A1 OA 


AI OilT7 

01«o3r 


OOOOOO 






nov 


2536 


A1 51 O/ 

01 CI c4 


AAAOA7 

OOOcUr 








RT5 


2537 














2538 














2539 
2>»0 


A1 "IZ. 

012126 


A007i»7 


rWM 7* 
0001 r O 




CKSWR : 


CAP 


25A ! 


Ai iy 
01 CI 34 


001035 








BNt 


25A2 


A1 TZ 

01il3o 


1 AC777 

105 y y f 


I00354 






TC TO 

TSTB 


25A3 


AI y o 
0lcl4i 


10003£ 








BPL 


"icy / 


Ai y y 
01^144 


AI 77X.7 

01 r fof 


1OO350 


IOOjOO 




nOv 


"icy c 


A1 CO 

012152 


Ay 07it7 


1 yoOO 


1 XX 7 AH 




BIC 


ocy A. 


A1 OiZY\ 


A007it7 


AAAAA7 

OOOOOf 


10035c 




CMP 


ocy 7 


AI 

01cl6o 


yv\i AOA 
001 OfO 








BNc 


ocy o 

2548 


AI 01 7A 
01 £l 7U 


AI 07A0 


AI 17y 7 

013y4y 






MOV 


"icy o 


AI 7y 
01 il 74 


1 Ay y Ay 
104404 








TOP 


^CCA 

2550 


AI 7Z 

0lil7o 


AI 07A0 

Olcy^Oi 


AI 17Cy 

013^54 




CNTLU: 


nov 


^cci 
2551 


AI 01A0 

012202 


1 Ay y Ay 
104404 








TAO 
TOP 


2j52 


AI OOA/ 
Ol£^U4 


AI T7AO 

01 r iMc 


lOO30e 






MQV 


■5C«CT 

2553 


A1 OOlrt 
Ol££lO 


iy*i^ ic 








OCTPRT 


occy 


AI O 


AI 07AO 
VICfVC 


013rO3 






HUV 


occc 
2533 


Ult^lO 


1 A^/ Ay 
104404 








TOP 


occx. 
2j3o 


AI OOOA 

012220 


AACA'X7 

00503y 


00054c 






CLR 


C.JJI 






00000? 






JSR 


2558 


012230 


000207 






OUT: 


RTS 


2559 














2560 


012232 


005067 


166304 




SREAD: 


CLR 


2561 


012236 


012767 


000007 


166300 




MOV 


2562 


012244 


104400 






1$: 


WAJTKY 


2563 


012246 


042767 


177600 


167052 




BK 



H 4 
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SEQ 0O46 



(2)*,aTPB .-PRINT CHARACTER 

TOPI 
M, LINE FEED 
aTPS 
.-4 

#215,aTPB ;CR 

aTPS 

.-4 

#21 2. aTPS ;LF 
R2 

RDSW 
T0P3 
TOPI 



a#6.-(SP) ;SAVE VECTORS 

-(SP) 

#1$^ar4 ;SET UP FOR TIMEOUT 

#-UaSWR .-REFERENCE HARDWARE SWITCH REGISTER 

2$ 

3$ 

(SP) + .(SP)* .-ADJUST STACK 

#SWREG,SWR .-POINT TO SOFTWARE SWITCH REG 

#DISPREG. DISPLAY ;POINT TO SOFT DISPLAY REG 

(SP)*.»r4 .-RESTORE VECTORS 

(SP)*,8#6 

PC 



#SWREG,SUR 
OUT 
aTKS 
OUT 

aTKS, TIB 
*1 77600, TIB 
*7,TIB 
OUT 

mNTG,R2 

#SMSWR.R2 

aSWR,R2 

4'$MNEW,R2 

a»TEMPST 
PC, SREAD 
PC 

TEMPS T 
#7, COUNT 

#1 77600, CHARIN 



; SOFTWARE SWITCH REG PRESENT 
;N0, GET OUT 
YES,WAIT FOR 
;READY, GET CHARACTER 
;ANO STRIP OFF 
;THE GARBAGE 
;IS IT A <*G> 



;G0 READ A LINE 

.-RETURN TO MAIN BODY OF PROGRAM 



;G0 READ A CHARACTER 
.-STRIP OFF GARBAGE 



CZTMCDO TM11 DATA RELIAB 



MACYII 30A(1052) 03-JUN-80 



I 4 
15:27 PAGE 47 



CZTMCD. 


P1 1 03-JU»4-80 


15:26 


2564 


012254 


\dcfbf 


000025 


2565 


01 2262 


AA1 AAO 

001 002 




2566 


01cc6*» 


OOjf c6 




2567 


0lcc66 






2568 


01 ccf\) 


1 007Z7 


000015 


2569 


01 22 r 6 


AA1 A1 1 
00101 J 




2570 


\J\djW 


A1 07ii7 
Olcf Of 


000200 


2571 


012306 


AA/ 7iL7 

00*»'6r 


177470 


2572 


A1 OH 5 

Olc^lc 


VddfOf 


000007 


2573 


rtl 51TA 


Owl 0 JO 




2574 




OvjrcO 




2575 


A1 Of 


OOOr Hi 




2576 


01 CJCO 


iccf Of 


000060 


2577 


A1 Oily 


AATAAZ. 

OOjOOh 




2578 


01 djjo 


1 077il.7 
iddfOf 


000067 


2579 


A1 OT/ L 


AAOrt/V. 

OOcOOh 




2580 


A1 OTZ.iC 

01cJ*»6 


A1 o7no 
Olcf Oc 


013776 


2581 


A1 OTCO 

01 d5od 


1 A/ Z A/ 

IOhmOh 




2582 




rtAn7Z'< 

UUUf 




2583 


A1 OtCiL 

01 dyyo 


OUCoOf 


166160 


2584 


01cX>c 


<VWLfA7 
UUO^r 


166154 


2585 


Olc^oo 


rwvLfA7 

UUOOOr 


166150 


2586 


ni 0X70 


1 HcfOf 


000060 


2587 


u 1 c*mu 


1 jOfOi 


166722 


2588 


ni oz.A^ 


nrt?fA7 

VA/^jOr 


166132 


2589 


ni 0 
U 1 c*» 1 c 


nm 7^^ 




2590 


U 1 c*» 1 *» 


\fUUf 1 J 




2591 


ni o/,i A 

U 1 dH 1 o 


ni A777 
U lOf f f 


166120 


2592 


U 1 CHC*» 


\AAJf jO 




2593 








2594 


ni oz 0^ 
01 c*»co 


ni 1 AAA 
U 1 lOOO 


000002 


2595 


\JldHX 


1A071 A 
lOcr lO 


000002 


2596 




A1 lAZA 




2597 


U lc*»*»U 


UOC' lO 


106046 


2598 




U 1 30Ur 




2599 




rt1 1 A^Z 




2600 


U 1 d'*j\J 






2601 


U 1 dHJC 


m 1 7XP 




2602 




Wt3 Ic 




2603 




nn^A9A 

UUnOcO 




2604 


At ozitn 


A1 1 T5A 
Ul l3cO 




2605 




UUH33W 




2606 


UIc*»OH 


UUD3cO 




2607 








2608 








2609 




Wf 13*« 




2610 


rtl 0L7L 


A1 IZCX 
U 1 1 HjO 




2611 


ftl 9Z7A 


nil 71 A 




2612 




U IcUhO 




2613 


01 2502 


012176 




2614 


012504 


012126 




2615 




104400 




2616 




104402 




2617 




104404 




2618 




104406 




2619 




104410 





SEO 0047 



167044 

167030 
166240 
166224 

166772 
166762 



CMPB #25.CHAR1N 
BNE 2S 
3$: TST (SP)* 

Bft CNTLU 
2S: CMP8 #15.CHARIN 
4$ 

#200,RDSW 
PC.T0P2 
#7, COUNT 
7$ 

(SP)* 
OUT 

#60, CHAR IN 
5$ 

#67, CHAR IN 
6$ 

#$QUEST,R2 



8S 
4S 



5S 



6$ 



166726 
166134 



166066 7$: 



CMP8 
BNE 
MOV 
JSR 
CMP 
BNE 
TST 
BR 
CMP8 
BGT 
CMPS 
BGE 
MOV 
TOP 
BR 
ASL 
ASL 
ASL 
BIC8 
BISB 
DEC 
BEQ 
BR 

nov 

BR 

.TRAP HANDLER 
TRAP34: MOV 
SUB 
MOV 
ADD 
MOV 

TABLE: UAITK 
URITI 
TO 

SVCTR 
RSFDR 
OCTPR 
HVCTR 
GENPA 
CLRAL 
CHGDR 
READJ 
DECPR 
SP3X 
SUSUR 
CNTLU 
CKSWR 
UAITKY=1 04400 
WRITIT=1 04402 
TOP-1 04404 
SVCTRS=104406 
RSFDRV=1 04410 



;IS IT A *U? 
.-BRANCH IF NOT 
;P0P THE STACK 
.•START OVER 

;IS IT A <CR>? 
.'BRANCH IF NOT 

.-ECHO IT WITH <LF> 
.-WAS IT FIRST CHARACTER 
.•CHANGE SUR IF NOT FIRST ONE 
.-POP THE STACK 
.-GET OUT 



3$ 

TEMPS T 

TEMPS T 

TEMPS T 

#60,CHARIN 

CHARJN,TEMPST 

COUNT 

5S 

IS 

TEMPS T,aSWR 
8$ 

aSP,2(6) 

#2,asp 

aC6)-*,-<6) 
#TA8LE-1 04400 

a(6>+,pc 



.•START OVER IF NOT LEGAL CHARACTER 

;GET NITTY-GRITTY 
.•ONLY WANT 6 DIGITS 

.CHANGE SWITCH REGISTER CONTENTS 



,asp 



CZThCDO TMII DATA RELIAB 
CZTMCD.P11 05-JUN-80 15:26 



2620 

2621 

2622 

2623 

2624 

2625 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

2634 

2635 

2636 

2637 

2638 

2639 

2640 

2641 

2642 

2643 

264A 

2645 

2646 

2647 

2648 

2649 

2650 

2651 

2652 

2653 

2654 

2655 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 



012506 

012513 

012520 

012526 

012534 

012542 

012550 

012556 

012564 

012572 

012574 

012602 

012610 

012616 

012621 

012626 

012634 

012642 

012650 

012654 

012662 

012670 

012676 

012704 

012712 

012715 

012722 

012730 

012736 

012744 

012752 

012760 

012761 

012766 

012774 

013002 

013006 

013014 

013022 

013030 

013031 

013036 

013044 

013052 



104412 
104414 
104416 
104420 
104422 
104424 
104426 
104430 
104432 
104434 
104436 

037457 
057 
041505 
052111 
040057 
040520 
020122 
046122 
020117 
027440 
046457 
051505 
046105 
040104 
057 
040057 
020105 
051525 
051117 
042457 
020106 
025052 
025052 
025052 
025052 
104 
052101 
042040 
042117 
047503 
047105 
057 
057 
020104 
051525 
051117 
040057 
042040 
051105 
057 
057 
020040 
040524 
020040 



020100 
051500 
020124 
020123 
051524 
020124 
042504 
020123 
046522 

054101 
051524 
041505 

057 
047440 
051127 
052123 
042440 
027500 
042116 
040524 
025052 
025052 
025052 

100 
053122 
050040 
047105 
020105 
042122 
052107 

051100 
052123 
042440 
027500 
042522 
052101 
047522 

047503 
020040 
052524 
042522 



MACYll 30A(1052) 03-JUN- 



0CTPRT=104412 
MVCTRS=104414 
6ENPATs104416 
CLRALL=1 04420 
CHGDRV=1 04422 
READJT=1 04424 
0ECPRT=1 04426 
SP3=1 04430 
SUSUsI 04432 
CNTL=1 04434 
CKSU=1 04436 
.TEXT MESSAGES 
MSGO: .ASCII 



057 
046105 
047125 
027440 
020124 
040520 
020116 
046527 
040117 

052040 
051440 
042524 

027513 
052111 
052101 
051122 



MSG1: .ASCII 



nSG2: 



.ASCII 



MSG5: .ASCII 



MSG6: .ASCII 
MSG7: .ASCII 



047440 nSG8: .ASCII 

042520 

025052 

025052 

025052 

050040 .ASCI I 

051101 

046440 

042522 

046040 

040110 

040505 MSG9: .ASCII 

052101 

051122 

042101 MSG9A: .ASCII 

020101 

040122 



042115 
051440 
020123 
047503 



MSG9B: .ASCII 



48 



SEO OO^H 



;/?a /; 

;/aSELECT UNITS /; 

;/aTST PAT PA« DEN RLS 1/10 RMOa /; 

;/mAX TESTS SELECTEDS/; 
;/ OK/: 

;/aURITE STATUS ERRORa/; 

;/ENO Of TAPE**************»*****a; 

;DRV PAT PAR DEN MODE RECORD LENGTHS/ ; 

;/aREAD STATUS ERRORa/; 
;/aREAD DATA ERRORa/; 

;/COMD STATUS RECORD LENGTH EXPECTED ACTUALa/; 



C2TMCD0 TM11 DATA RELIAB MACYll 30A(1052) 

CZTMCD.P11 03-JL»*-80 15:26 



2676 

2677 

2678 

2679 

2680 

2681 

2682 

2683 

2684 

2685 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2696 

2699 

2700 

2701 

2702 

2703 

2704 

2705 

2706 

2707 

2708 

2709 

2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

2720 

2721 

2722 

2721 

272k 

2725 

2726 

2727 

2728 

2729 

27U0 

2731 



013060 
013066 
013074 
013102 
013110 
013115 
013122 
013130 
013136 
013144 
013147 
013154 
013162 
013170 
013176 
013204 
013212 
013217 
013224 
013232 
013240 
013242 
013250 
013256 
013264 
013270 
013276 
013300 
013306 
013310 
013316 
013320 
013326 
013327 
013334 
013336 
013344 
013345 
013352 
013354 
013362 
013370 
013376 
013404 
013412 
013420 
013426 
013434 
013442 
013450 
013456 
013464 
013472 
013500 
013506 
013514 



042122 
047105 
054105 
042105 
040525 

057 
041515 
030515 
040524 
040511 

100 
042122 
052111 
041040 
046500 
020116 
042514 

057 
041522 
020107 
027523 
054057 
051127 
020116 
042515 
020057 
027440 
020057 
027440 
020057 
027440 
046457 

057 

057 
027516 
046457 

057 

057 
027440 
040057 
020105 
051522 
040057 
042526 
052101 
040057 
047101 
040502 
051524 
040057 
051440 
020123 
051522 
040057 
042440 
020123 



020040 
052107 
042520 
040440 
040114 
041500 
030104 
020061 
051040 
102 
042522 
046040 
020123 
052131 
047111 
046440 
040116 
042500 
051511 
047125 

051111 
052111 
020064 
027523 
051523 



046040 
020110 
052103 
052103 
057 
052132 
052040 
040504 
046105 

047503 
046511 
047111 
051505 
042514 
054101 
057 
042530 
047111 
052111 

020107 
042524 
044524 

050124 



047122 046504 



051516 
046455 
026515 



050124 
054101 
044515 



047111 020040 
040515 020130 



051127 
051105 
036440 
042522 
042522 
030040 
042520 
047105 
051504 
036U0 
042522 
040524 
051105 
036U0 
040504 
051122 
020075 



052111 
047522 
027440 
047503 
020104 
027440 
046522 
020124 
047520 
027440 
042101 
052524 
047522 
027440 
040524 
051117 
057 



nsdOA: 



NS610B: 

MS611: 

nSG12 
nS613 
nSGH 
nS615 
nS616 
nS617 

nsGis 

nSG19 
RS620: 
nSG20A: 

nSG21: 

nSG22: 
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.ASCJI .-/aCZTHCDO THII DATA RELIAB; 

.ASCII .-aRECORO LiniTS IN BYTES: 

.ASCII .-aniNLEN MAXLENa/; 

.ASCII ;/aEXERCISING UNITS/; 



.ASCII ;/XIR6 WRITTEN 4 TIMES/; 

.ASCII ;/ SSTP /; 

.ASCII ;/ RNDM /; 

.ASCII ;/ NSTP /; 

.ASCII ;/«-mx/; 

.ASCII ;/W-fUN/; 

.ASCII ;/MIN /; 

.ASCII ;/MAX /; 

.ASCII ;/aURITE ERRORS = /; 

.ASCII ;/aRECOVERED AT 0 /; 

.ASCII ;/aPERMANENT BADSPOTS = / 

.ASCII ; /BREAD STATUS ERRORS = / 

.ASCII ;/aDATA ERRORS = /; 



CZTMLDC TMIl DATA RELlAB NACYll 30A(1052) 

CZTMCD.Pn 03-JUN-80 15:26 



2732 


013521 


057 


047100 


047117 


MSG23: 


2733 


013526 


051040 


041505 


053117 




2734 


013534 


051105 


041101 


042514 




2735 


013542 


042440 


051122 


051117 




2736 


013550 


020123 


020075 


057 


MSG24: 


2737 


013555 


057 


025100 


025052 


2738 


013562 


025052 


025052 


025052 




2739 


013570 


025052 


025052 


025052 




2740 


013576 


025052 


025052 


053452 




2741 


013604 


044522 


042524 


050040 




2742 


013612 


051501 


020123 


027440 


MSG25: 


2743 


013620 


040057 


025052 


025052 


2744 


013626 


025052 


025052 


025052 




2745 


013634 


025052 


025052 


025052 




2746 


013642 


025052 


025052 


042522 




2747 


013650 


042101 


050040 


051501 




2748 


013656 


020123 


020040 


057 




2749 


013663 


057 


020040 


031040 


MSG26: 


2750 


013670 


030060 


057 






2751 


013673 


057 


020040 


032440 


MSG27: 


2752 


013700 


033065 


057 






2753 


013703 


057 


020040 


034040 


MSG28: 


CI J** 






057 




nSG29: 


2755 


013713 


057 


020040 


041440 


2756 


013720 


020104 


057 




MS630: 


2757 


013723 


057 


040100 


027500 


2758 


013730 


040057 


047105 


020104 


MSGil: 


2759 


013736 


043117 


050040 


051501 




2760 


013744 


040123 


057 






2761 
2762 


013747 


057 


057100 


027507 


SCNTG: 


2763 


013754 


040057 


051500 


051127 


SnSUR: 


2764 


013762 


020075 


057 






2765 


013765 


057 


020040 


042516 


SHNEWi 


2766 


013772 


036527 


027440 






2767 


013776 


040057 


040077 


027500 


SOUEST 


2768 












2769 












2770 


014004 


014004 






BUFFER 


2771 




000001 
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SEO 0050 



^SCII 



;/aN0N REC0VERA8LE ERRORS = /; 



ASCII 
ASCII 



ASCII 


;/a* 




ASCII 


;/a* 




ASCII 


;/ 


200/; 


ASCII 


;/ 


556/; 


ASCII 


;/ 


800/; 


ASCII 


;/ 


CD /; 



WRITE PASS /; 



READ PASS /; 



/aaa/ * 

/aEND'oF PASSa/; 



ASCII ;/a*G/; 

ASCII ;/aaSWR= /; 

ASCII ;/ NEW= /; 

ASCII ;/a?aa/; 

EVEN 



END 



;URITE BUFFER BEGINS HERE 



C2TMCD0 TMII DATA RELIA8 MACYll 30A(1052) 03-JUN-80 15: 



CZTMCD.P11 03-JUN-80 


15.26 




CROSS REFERENCE 


TABLE - 






1683 


1687# 






1547 


ALLtUi 




1398 


1414 




1 L7R 
1 H f O 


ALL 1 




1681# 


1635 








ALLc 




1689 


1691 








ALLj 




1686 


1704# 




118'^ 

1 1 OJ 




1 O 1 


UUUj jU 


995# 


1075* 


1170* 




Al iTn^T 


UU 1 jOO 


966 


1073* 






2308 


DArr 1 

OALR. \ 


U 1 UcUU 


1845 


1846 


??1 7 


CCJrIt 






974# 


1749* 


1750* 

1 f Jv^ 


1R50* 


2148* 


Dl ^ T Air 


\AAJJfO 


1006# 


1730* 


17^^* 


17'^R* 


1802 


Ot ICC CD 

our r CN 




985 


986 


10AA 


1000 


1094 






975# 


1751* 


7150* 


?'^15* 

CJ 1 




LL 




976# 


1716* 


17?1* 










1700 


1702# 






1640* 






1003* 


1621 


lOCC 




LUNvo 1 




1002* 


1637* 




1^?* 


1661* 


ruAD 


U 1 1 hjO 


1867* 


1868* 


1R70 

1 Of V 


1 Or J 


1879* 






2269* 


2270* 


7777 
CC 1 c 


??75 


2278 






2388* 


2391* 




2393* 


2394* 






2426* 


2427* 


7LJ/>M 


?i^9 


1195* 




lA/ 1 Jew 


1054# 


1179 


1186 


1188 






1245* 


1246* 


1247* 


1248 


1252 






1288 


1294 


1296 


1300 


1306 






2576 


2578 


?586* 


?587 








1659# 


1667 


2608 

C wvw 


1437 








1396 


1412 


1430 


1444 




1545 


1572 




1596 


1630 






1074# 










rum? 


00^^00 


1374# 












00^77^ 

\J\^ f f H 


1662 


1666* 












1361 


1687 


1698 


1831 


1910 




V/ 1 c 1 CO 


2540* 


2614 










0O4S7P 


1626* 


2607 




1453 




ri OAi 1 — 

LL/%^L.L — 




1387 


1404 


14?? 


1491 


n PTn 


OOSI^^ 

\J\JJ 1 


1628 


1709# 








f 1 RT1 




1710* 


1712 












1627* 


1631 












1341 


2629<r 








Lni LU 


01 PI 76 


2550# 


2567 


?613 


1648* 




rCVUMD 


OOO^M 


1001* 


1644* 


1645* 


1651* 






2353 


2378 








rflMT 


OOOS^^ 


993# 


2561* 


2572 


2588* 




rTRDFIf 




1607 


1613 


1619# 






rTMMP 




1693* 


1703 








rTROI 

V f nLf 1 


00^140 


1696 


1701# 










0006^ 


^O2^0 


2198* 


2290 










2163 


2186* 












2187 


2196* 








nprnifT 




2452 


2459# 








OECPNT 


011640 


2445* 


2449 


2451 


2457* 


2^7t*lt 


DCCPR 


01K56 


2444# 


2610 








OeCPRT= 


104426 


I ICO 


1 130 


1878 


1895 




oeci 


011600 


2460 


2462 


2465* 






DEC2 


0116U 


2464 


2467# 








OIGCNT 


011634 


2444* 


2453* 


2461 


2^72M 




DIGIT 


011632 


2447* 


2448* 


2459 


2463* 


2466* 



n 4 

7 PAGE 52 

USER SYMBOLS SEO OC^I 



1588 


1600 


1680* 












2149* 


2241* 


2313* 


2314* 


2350* 


2351* 


."352* 




1804 


2226 


2229 












1138* 


1139 


1158 


1164 


4 4 y A 

1169 


'^^'9A M 

2770* 






1644 


1659* 














1666 
















1880* 


1882 


1885 


4 A AO 

1888 


2257* 


2258* 


2260 


2263 


2378* 


2379* 


2380* 


2381* 


2384* 


2385* 


2386* 


2387* 


2398* 


2399* 


A4 

2401 


2404 


-yj A^ 

2407 


2414* 


2417* 


2425* 


1196* 


1198* 


1219 


1224 


1226 


1231 


1241 


1243 


1254 


1262 


1264 


1268 


1272 


1278 


1280 


1284 


1308 


1312 


1322 


2486* 


2487* 


2563* 


2564 


2568 


1461 


1469 


1476 


1496 


1507 


1514 


1524 


1540 


1684 


1702 


2624* 












1919 


2296 


2374 


2411 


2630* 








1555 


2623* 














1654* 


1673 


1744 


1851 


2138 


2151 


2242 


2311 


1918 


2268 


2285 


2291 


2295 


2371 


2373 


2626* 



2469 2471* 



L 



CZTMCDO TMIl DATA RELIAB 
CZTMCD.P11 03-JU»*-80 15:26 



DISPLA 


0005H 


978* 


DISPRE 


000 1 74 


962# 


DQAGN 


003320 


4 9^4 

1371 


0O€ 


AAV ^4 ^ 

003216 


1359# 


0ONE1 


003264 


1363 


DRVADR 


000646 


4 A^AM 

1029# 


ORVSEL 


000552 


AAZ M 


OOTAB 


000666 


4 A'^A 

1029 


DiTAB 


000732 


1 ATA 

1030 


02TAB 


000776 


4 ATI 

1031 


03TAB 


001042 


i ATO 

1032 


OATAB 


001106 


4 ATT 

1033 


051 AB 


001152 


1 ATy 
1034 


11^^ T An 

OoTAB 


001216 


1035 


D/TAB 


001262 


1 ATX 

1036 


Aff\n 


003310 


OCT 

953 


tM)TAP 


006214 


1821 


ErDTl 


006226 


1697 


EOPfC 


012044 


oy 

2499* 


cRROR 


005762 


1 for 


P DDI 

ERR 1 


AA^/v\y 


18^3 


EXcC 


003 I3£ 


1343* 


C WC ^1 IT 


AAT1 i ^ 
003 llO 


i 1 XA 
1160 


cXECl 


003 IhO 


1 7y y M 


GtrrA 


AA^CO^ 

00d5£O 


19^6* 


Gc^fAl - 


1 A/ / IX 

IOhh lo 


l3oo 


uCBKyp 


A1 AT*0 

010732 


1 y TC 
1435 


UJU1 


A1 A7CX 




GUMAI 1 


005^0^ 


1X77 


Uwl 


003c44 


^ 71 fi 

1 r 18 


LI tU ■■ 

HINUn 


AA7/ 


1 A01 * 




OUlOOO 


1 1 nx 
1106 


LASHCR 


AAAiL7A 
000630 








1 COT 

1593 


LcNGTH 


AAACCX 

000556 




LQNLP1 


yv%7y OA 


1 AOA^ 

1080* 


LUDrxR 


yv\i 7/ 
001 /^hO 


1 1 y Xi* 


nAXLEN 


000526 


983# 




00c0££ 


OX7 

Stir 


HEnoK 


OOfUHO 


AXO 

968 


•A ff AH C Al 

nINLEN 


/^AACTA 

000530 


AOy M 

984* 


noDca 


000644 


1 AOXM 

10£6* 






1 y 71 






1 CX7 

156r 






1 701 
1 fVl 


MCDff TC 

nSBI 19 


AAACXA 

000560 


OAAM 

9yT» 


nouU 


01^506 


1 'i'io 


nSul 


A1 OC1 T 

01c513 


1 1 7C 

no 


nsuiiM 


01311 5 


1 1 oc 
1125 


nsGlOB 


013217 


1136 


nSOl 1 


013t*»c 


£335 


BSG12 


013270 


1872 


MS613 


013300 


1875 


nSGU 


013310 


1869 


nsGis 


013320 


1887 


nSG16 


013327 


1890 
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CROSS REFERENCE TABLE — USER SYMBOLS 



2533* 












2533 












4 Ya4 M 

1381# 












4 / AA 

1400 


4 / 4 Z 

1416 


4 * y o 

1448 


4 / AA 

1480 


1 cy A 

1549 


4 CAA 

1590 


4 TZ f 

1367 


4 T7AM 

1370* 










4 ^ AA 

1609 


4 ^ 4 f 

1615 


4 ^ ^A 

1620 








1102* 


1 4 AT 

1107 


ill Aa 

1119* 








10384f 


4 ATA 

1039 










1040* 


4 Ay 4 

1041 










4 A/ ^ M 

1042* 


4 A/ T 

1043 










4 A/ / Al 

1044* 


1 A/ C 

1045 










4 A/ Z M 

1046# 


^ A/ T 

1047 










1 Ay Dm 
1048* 


1 Ay Q 
IOhV 










4 ACAM 

1050* 


i ACi 

1051 










1 AdM 

1052* 


1 ACT 

1053 










1 T7T 

1373 


1377* 










1 oy T 
1843 


1 OCOM 

1858* 










4 OZ. AM 












2500 


0C01 M 

2521* 










1820* 












1825* 












1 TOO 

1382 












1 1 BC 

1185 


1 OOT 

lcc3 


1 TXAi* 








1 TXO 

1369 












ox AX 

^606 












1 y AC 
Ih05 


1 / OT 

1423 


1 y c/ 
1h54 


1 y Dx 
1486 


1 CCX 

1556 


OXOOM 

2622* 


1 y x7 


1 coo 
15ec 


OTXCit 

c3h5* 








oTcnjf 
^350* 












1 71X« 


1 7CT 

103 


1 DCT 

1853 


01 CT 

2153 


oo/ /. 
2244 


OT1 D 

2318 


1 70TJt 
1 fCjIf 












1 1 7y A 


OAOX 

2096 


oinx 
2106 


01 1 D* 

2118* 


01 OXM 

2126* 




1 1 OCif 












1 CTA 

1530 


1 CTO 

153c 


1 CTC* 

1535* 


1 CTX* 

1536* 


1 CTB* 

1538* 


1 C/ T 

1543 


01 XQ 

cl69 


01 DO 

2182 


OTZC* 

c345* 


OTCA 

c350 






1 DOAa 

1829* 


2190* 


OOA7*, 

2207* 


OTTT* 

2333* 


OT70 

2372 




1 1 7T* 

no* 


OAOC 

2095 


01 A/ 

cIOh 


01 1 7* 
Cll f * 


01 OCJI 

clc5* 




1 1 CC 

1155 












1 ADO* 

1089* 


1 AOT* 

1093* 


1 1 oo 
llcV 


1 1XT* 

1163* 


1168* 


1 700 

1 fCr 


1 1 xoj» 
1 16c* 












1 1 X7J» 

1167* 












1 ADO* 

1088* 


1 AAO* 

1092* 


1 1 07 

1127 


1 1 xo* 

1 162* 


1 1 X7* 

1167* 


1 7TT 

1 03 


1 T/ A* 

1340* 


1 TDX* 

1386* 


1 T01 

1391 


1 y AT* 
1403* 


1 AAD 

1408 


1 /. 01 * 

IhcI* 


1 y Dc^ 

1485* 


1 y OA^ 
1489* 


1 y oAa. 
1490* 


1 y aOa 
1498* 


1 CA1 

1501 


1 CAA 

1509 


1 C7X 

15/^6 


1 coc* 
1595* 


1 COD 

1598 


1 XTO* 

1632* 


1 XDO 

1682 


IXOA 

1690 


1 TOT 

1 r93 


1 70X 

lr9o 


1 DAI * 

1801* 


1 D1 O* 

1812* 


1 DTD 

1838 


1 DCO* 

1859* 


1 1 AT* 

1103* 


1 lis* 


1 1 T1 

1131 


1 1XX 

1 146 


llf r* 


1 1 B1 

11 81 


2632* 












^633* 












OXD1 M 

c6B1* 
























26970 












2262 


2701* 










2265 


2703# 










2259 


2705* 










2277 


27070 










2280 


2709* 











SEQ 0052 

1602 



2341 2360 



1569* 


1570* 


1578 


1581* 


1582* 


1584* 


1807 


2252 










1805 


2250 










1426 


1433 


1440 


1452* 


1457 


1465 


1512 


1520 


1528 


1554* 


1559 


1564* 


1699 


1711 


1713* 


1770 


1772 


1775 


2249* 












1202 


1204* 


1206* 


1638 


1666 
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SEO 0053 



HSG17 
nSG18 
HSG19 

nsG2 

nSG20 
nSGZQA 
nSG21 
nSG22 

nsG23 

nSG24 
RSG25 
HSG26 
nSG27 
nSG28 
nsG29 

nSG30 
NSG31 
NSG5 

nsG6 

KSG8 

HSG9 

nSG9A 

nSG9B 

MTC 



MTS 

MTV 

HVCTR 

MVCTRS= 

HV1 

NOINCR 

NQNSTP 

NO.SEL 

MWEAD 

NlfTTST 

NXMRET 

hWT.TU 

OCT 

OCTP 

OCTPR 

0CTPRT= 

0CT1 

0CT2 

OUT 

0VER4K 

PAPAIN 

PATEN 

PATEND 

PATENT 

PATEN2 

PATEO 



013336 

013345 

013354 

012534 

013376 

013420 

013450 

013500 

013521 

013555 

013620 

013663 

013673 

013703 

013713 

01333 

013730 

012574 

012621 

012626 

012654 

012761 

013006 

013031 

000502 



000500 

000536 
004530 
104414 

004534 
005344 
005410 
001646 
000636 
001330 
001464 
001572 
011434 
011440 
011326 
104412 
011346 
011364 
012230 
001512 
001332 

007226 
007206 
007232 
007244 
006614 



1881 

1884 

1892 

1214 

1897* 

1914 

2282 

2288 

2292 

1860 

2250 

2400 

2403 

2406 

2409 

1359 

1374 

1336 

1319 

1827 

1862 

2205 

2188 

2363 

973M 
1852* 
2312* 

972* 
2356* 

987# 
1613* 
1390 
1542 
1614# 
1728 
1749* 
1113 
1023* 
1055* 
1083 
1107* 
2421* 
2382 
2414* 
2193 
2416 
2422* 
2541 
1086 
1056* 
1778 
2080 
1992 
2084* 
2082 
1933 



2271 

2274 

2715* 

2636* 

1898* 

2721* 

2725* 

2729* 

2732* 

2737* 

2743* 

2749* 

2751* 

2753* 

2755* 

2757* 

2758* 

2642* 

2646* 

2331 

2252 

2664* 

2668* 

2672* 

1101* 

1854* 

2322 

1109 

1718* 

2605 

1407 

1566 

1616 

1737 

1768 

1115 

2219* 

1079* 

1087* 

1122 

2431* 

2389 

2604 

2195 

2418* 

2432 

2543 

1092* 

1343* 

1867 

2083* 

2001 

2086 

2087* 

1951* 



2711* 
2713* 



1901 



2647* 
2651* 



2718* 



1105 
1855* 
2339* 
1114 


1107* 
2138* 
2340* 
1116 


1671 
2139 
2353* 
1674* 


1673* 
2151* 
2354 
1747* 


1676* 
2152* 
2358* 
1755 


1719* 
2156 
2359* 
1847 


1744* 
22U2* 
2365 
2141* 


1745 
2243* 

2155 


1752* 
2245* 

2239* 


1756 
2309 

2316* 


1851* 
2311* 

2321 


1425 
1575 


1432 
1592 


1439 
1681 


1456 
1694 


1464 
2621* 


1471 


1493 


1500 


1511 


1519 


1527 


1739* 

1773 

1117 

2294 

1216* 


1776 
1119* 

1221 


1332* 


1333 


1370* 














2435* 
2395 


2418 


2429 


2437* 
















2366 


2368 


2553 


2620* 
















2547 


2558* 


2575 


















1344 
1879 


1364 
1927 


1368* 

2079 


1533 
2081 


1579 
2166 


1646 
2m 


1649 
22S7 


1652 
2269 


1731 
2384 


1736 
2391 


1765 
2398 


2042 


2048 


2053 


2060 


2072 


2079* 













CZTMCOO mil DATA RELIAB 
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SEO 0054 



PATE1 

PATE2 

PATE3 

PATE4 

PATE5 

PATE 7 

PATOO 

PAT01 

PAT02 

PAT03 

PAT04 

PAT05 

PAT07 

PATPNT 

PAT6 

PERMBS 

PE1 

PE5 

PFIL1 

PfIL3 

PF1L5A 

PFIL9 

PF I L9A 

P01 

P05 

PRTD 

PRTS 

RAMXyt 

RANGEN 

RANG1 

RANSTP 

RANI 

RSUF 

ROERRO 

RDERAS 

RDINCR 

ROPASS 

ROSTP 

ROSTPC 

ROSTPO 

Rosy 

READGO 

READI 

R£ADIT= 

REAOLN 

REAOffP 

RECORD 

RESETL 
RESTRL 
RESTR1 
REWIND 
RG1 

RNDRDS 
RNDS1 



006630 
006660 
006674 
006710 
006754 
007040 
006622 
006644 
006666 
006702 
006734 
007002 
007070 
006554 
007032 
000622 
006636 
006762 
007110 
007122 
007130 
007154 
007162 
006652 
007010 
011106 
011042 
007416 
007246 
007304 
005572 
005604 
000534 

010002 
000632 
010130 
000572 
007706 
007646 
007456 
000546 
007500 
007434 
104424 
000642 
010272 
000624 

005736 
010170 
010176 
005006 
007510 
007656 
007670 



1935 

1937 

1939 

1941 

1943 

1947 

1934 

1936 

1938 

1940 

1942 

1944 

1948 

1931 

1945 

1017# 

1959 

2006 

1952 

1960 

2057# 

2007 

2069* 

1965 

2019 

1865 

1830 

1782* 

1781 

2099* 

1781* 

1783* 

986* 
2143 
2157 
1021* 
2168 
1004* 
2173 
2167 
2138* 

994* 
2143* 
2134* 
1442 
1025* 
2255* 
1018* 
1810 
1806 
2231 
2227 
yb27 
2'\'^'ilt 
2174* 
2176* 



1959* 

1973* 

1981* 

1988* 

2006* 

2036* 

1955* 

1965* 

1977* 

1984* 

1997* 

2019* 

2044* 

1933* 

1946 

1837* 

1961* 

2008* 

1956 

1966 

2064 

2020 

2076 

1967* 

2021* 

2255 

2191 

1786* 

2036 

2103 

1787 

1090* 

2150 

2201* 

2212* 

2181 

2137* 

2181* 

2172* 

2183 

2502* 

2170 

2609 

1474 

2136* 

1494 

1858* 

1809* 

2234* 

2233 

1671* 

2147 

2180 



1994 
2038 

2003 

2047 

2032* 
1908 



1995 
2041 



1916 



1974 
2055* 


1978 


1982 


1985 


2033 


2050* 


2052 








2067* 




















2378* 
2208 
2037 
2044 


2334 
2039 
2091* 


2363* 

2045 

2174 


2116* 


2124* 


2175* 


2179* 








1094* 
2159 


1164* 


1169* 


1990 


1999 


2040 


2046 


2051 


2058 2070 


2085 


2284 
2225* 
2196 
2221 


2248 
2210 


2215* 


2220* 














2218 
2518 


2570* 


















1537 
2144 


1583 
2148 


2625* 
2161 


2190 


2207 


2229* 


2230 


2212 


2234* 




1530 
1877 


1535 
2134 


1543 
2169 


1562 
2182 


1563* 
2225* 


1569 
2267 


1581 
2345 


1593 
2346* 


1727 1739 
2369 


1800* 



2235* 
2348 



CZTHCDO TH11 DATA RELIAB 




MACYll 


30A(1052) 


CZTHCD.PII 03-JUN-80 


15:26 




CROSS RE 


RNDTAP 


010244 


2202 


22484r 


2250* 


RNDTPI 


010256 


1701 


2222 


RPASS1 


010104 








RPASS3 


010110 


2214 


2220M 




RSFOR 


004626 


16364f 


2603 


1424 


RSFDRV= 


104410 




1406 


1680 


1693 


2619* 


RSF1 


004640 


1638# 


1643 


1668 


RSF2 


004664 


1639 


1644/r 


RTSREC 


010042 


2204 


221 0/r 




RTSR1 


010056 


2199 


2213* 




RTSSTP 


007620 


21664r 


126&r 




SELDNI 


002552 


1265 




SEL0N2 


002570 


1269 


^2720 


1271 


SEL0N3 


002604 


1263 


^267 


SELDRV 


002130 


1178# 


1210 




SELD1 


002162 


1180 


1186* 




SELD2 


002202 


1187 


1190* 




SELOKI 


003110 


1334 


1336* 




SELPAT 


002400 


1227 


1231* 




SELPR 


002520 


1253 


1257* 




SELRHI 


002770 


1309 


1312* 


1316* 


SELRfG 


003010 


1307 


1311 


SELRl 


002636 


1281 


1284* 




SELR2 


002654 


1285 


1288* 


1287 


SELR3 


002670 


1279 


1283 


SELTST 


002306 


1184 


1214* 


1335 


SELTl 


002324 


1218# 


1230 


SELT2 


002350 


1220 


1224* 


1228* 


SELT3 


002370 


1222 


1225 


SELWn 


002722 


1297 


1300* 


1303* 


SELU2 


002736 


1295 


1299 


SP3 = 


104430 


1238 


1249 


1257 


SP3A 


011724 


2490 


2493* 




SP3X 


011714 


2490# 


2611 


1171 


STACK = 


000500 


988/r 


1073 


START 


002070 


1165 


1170* 




STARTl 


002074 


1133 


1171* 


1182 


STATRO 


000600 


1007# 


1755* 


1820 


STOPOP 


005562 


1766 


1778* 




STREC1 


006122 


1836 


1845* 


1733* 


STRLEN 


000554 


997# 


1729* 


STRTOP 


005366 


1744# 


1789 


1794 


SUSW = 


104432 


1074 


1172 


2628* 


SUSUR 


012046 


25250 


2612 




SVCTR 


004512 


^607» 


2602 


1429 


SVCTRS= 


104406 


1394 


1411 


1585 


1629 


2618* 


SVC1 


004516 


160&r 


1610 




SVRECR 


000562 


lOOOf 


1503* 


1505 


SVO 


007424 


2091* 


2119 


2127* 


SV1 


007426 


2092* 


2120 


2128* 


SV2 


007430 


2093* 


2121 


2129* 


SV3 


007432 


2094* 


2122 


2130* 


SUR 


000512 


977# 


1362 


1688 




2591* 
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SEO 0055 



1455 



1492 1499 1518 1526 1565 1574 1591 1626 1663 



1275* 



1291* 

1242 
1275 

1842 



1735 
1797 



1436 
1532* 

1825 



1244 1255 1273 1289 1301 1314 1324 

1291 1303 1316 2383 2390 2433 2455 2627* 



2155* 2201 2221 2321* 2326 2337 2367 



1809 2136 2234 
1849 1856 



1443 1460 1468 1475 1495 1506 1523 1539 1 571 



1538 1578* 1584 



1832 2186 2203 2213 2306 2528 2532* 2540 2552 



CZTMCDO TM11 DATA RELIA8 
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SEQ 0056 



SUREG 

TABLE 

TE«PST 

TESINC 

TESRC1 

TESREC 

TEST 

TESTO 

TEST1 

TEST2 

TEST3 

TEST4 

TEST5 

TIB 

TKB 

TKS 

TO 

TOP = 



000176 
012446 
000542 
005670 
006066 
006036 
001336 
003330 
003400 
003450 
003566 
003704 
004226 
000540 
000520 
000516 
011732 
104404 



Tnpi 


01 1 7CC 




w 1 CVA/C 




01175? 


TPR 


000S2A 


TP<1 


00052? 


TRAP^ 


01 ?4?6 




005744 




005760 


TSTFX 


001334 


TSTSTP 


005504 


TSTT8L 


001340 


TU.SEL 


001534 


TYPT1 


011500 


TYPT2 


011506 


TYPT3 


011542 


TO 


003342 


TOA 


003344 


TOB 


003362 


T1 


003412 


T1A 


003414 


TIB 


003432 


T2 


003462 


T2A 


003464 


T2B 


003502 


T2C 


003506 


T2D 


003526 


T2E 


003532 


T2F 


003546 


T3 


003600 


T3A 


003602 


T3B 


003620 


T3C 


003624 


T30 


003642 


T3e 


003650 


r3F 


003664 


T4 


003740 



963# 
2597 
992# 
1561 
1833 
1826 
1058# 
1347 
1349 
1351 
1353 
1357 
1356 
99U 
980ir 
979# 
2498# 
1126 
1876 
2293 
250a(r 
2505 
2502# 
982# 
981 # 
951 
1803 
1811 
1057# 
1759 
1060ir 
1091 
2447/r 
2448# 
2454 
1389# 
1390* 
1392 
1406* 
1407# 
1409 
1424* 
1425* 
1427 
1432* 
1434 
1439* 
1441 
1455* 
1456* 
1458 
1464* 
1466 
1471* 
1473 
1488 



2532 

2599* 

2556* 

1769 

1838* 

1832* 

1346* 

1386* 

1403* 

1421* 

1452* 

1485* 

1554* 

2544* 

2485 

2481 

2601 

1137 

1891 

2332 

2509 

2511* 

2519 

1192* 

1190 

2594* 

1808 

1813* 

1342* 

1765* 

1076* 

1100* 

2458 

2450 

2457* 

1399 

1397 

1396* 

1415 

1413 

1412* 

1447 

1431 

1430* 

1438 

1437* 

1445 

1443* 

1479 

1462 

1461* 

1470 

1468* 

1477 

1475* 

1491* 



2540 



2560* 
1790 


2583* 
1800* 


2584* 


2585* 


2587* 


2591 










2545* 

2486 

2542 


2546 
2544 


















1159 
1893 
2336 
2520 
2571 


1176 
1902 
2364 


1215 
1915 
2410 


1229 
2189 
2491 


1320 
2206 
2549 


1337 
2251 
2551 


1360 
2253 
2555 


1375 
2266 
2581 


1828 
2281 
2617* 


1861 
2283 


1209* 
1207 


1327* 
1325 


1330* 
1328 


2439* 
2437 


2469* 
2467 


2485* 
2483 


2508* 
2498* 


2513* 
2506 


2516* 
2511 


2514 


1810* 




















1343 


1381* 


1487 
















1077* 


1078* 


1217 


1342 















1863 
2289 



czTMCDO rmi 

CZTMCD.P11 



DATA RELIAB 
03-JUN-80 15:26 



T4A 

T48 

T4C 

T4D 

T4E 

T4F 

T4G 

T4H 

T4J 

T4K 

T4L 

T4« 

T4N 

T4P 

T5 

T5A 

T58 

T5C 

T5D 

T5E 

T5F 

T5FLAG 

T5G 

T5H 

T51NC 

T5J 

T5K 

USSTST 

USS.OK 

VALID 

VALl 

VAL2 

VAL3 

VAL4 

UAITK 

yAITKY= 

IdBUF 

URCHEK 

URITI 

URITIT= 

URPAS3 

URRECR 

URTDHP 

URTD1 

WRTD2 

URTLEN 

W1 

W10 

W11 

W12 

XRGRCD 

XRGREC 

XRGO 

XRG5 

ZERO 



003742 
003744 
003770 
003772 
004024 
004040 
004056 
004060 
004076 
004104 
004106 
004160 
004172 
004176 
004240 
004264 
004276 
004306 
004336 
004344 
004406 
004506 
004420 
004436 
004510 
004440 
004460 
001604 
001622 
002220 
002236 
002250 
002264 
002270 
011654 
104400 
000532 
000602 
005254 
104402 
000574 

000626 
006242 
006442 
006464 
000640 
005322 
005550 
005622 
005656 
010626 
010514 
010522 
010634 
011636 



1492# 
1493# 
1499# 
1500* 
1502 
1511# 
1510 
1519# 
1521 
1526# 
1527# 
1534 
1529 
1542# 
1557# 
1560 
1564# 
1566* 
1568 
1575# 
1580 
1557* 
1577 
1589 
1562* 
1592* 
1594 
1109* 
1110 
1189 
1198* 
1199 
1203 
1193 
2481* 
1178 
985* 
1008* 
1727* 
1393 
1005* 
2328* 
1019* 
1865* 
1898* 
1900 
1024* 
1732 
1771 
1779 
1792 
2307 
1840 
2306* 
2323 
2446* 
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1548 

1497 

1513 

1508 

1507* 

1515 

1518* 

1525 

1523* 

1544 

1541 

1537* 

1531 

1546 

1601 

1562* 



SEO 003/ 



1573 

1572* 

1587 

1583* 

1603* 

1586* 

1591* 

1570 

1597 

1596* 

1112 

1114* 

1195* 

1201 

1202* 

1206* 

1205 

2599 

1218 

1751 

1619 

2600 

1410 

1743* 

1494* 

1907 

1905* 

1735* 

1735* 

1775* 

1788* 

1796* 

2324* 

2305* 

2329 

2326* 

2463 



1540* 



1599 
1633* 

1604* 



1695 1740 



1207* 



1240 
1926 
1709 


1251 
2083 
1762 


1261 
2160 
1824* 


1277 
2315 
1894 


1293 
1896 


1305 
1906 


1321 


2562 


2615* 


1428 
1758 


1459 
1760 


1504 
1764* 


1558 
1767 


2616* 
1788 


1822 


1834* 


1835 


1841* 2i05* 2324* 


1503 


1505* 


1739* 


2346 


2351 










1749 


1804* 


1805 


1807 


1809* 


1829 


2313 


2333 





1844 

2327 
2338 



2465* 2473* 



6 5 



CZTMCDO 


TM11 DATA RELIAB 




MAT Vl 1 


30A(1052) 


03-JUN-80 15 


:27 PAGE 


59 


CZTMCD.P11 03-JUN-80 


1 C . 0(t 

1 5 :£0 




CROSS REFERENCE 


TABLE - 


- USER SYMBOLS 


tCNTG 


013747 




07^5# 


















CfOjff 














013754 




37A1# 














01 ^77fi 




07A7* 
CfOf * 
































007450 


2135 


01 17# 














007606 

WW • Ww 


2162* 


oi 

2165 


1723* 










SUAIT 


005232 


1 rl z'* 












$2ER0S 


001766 


11/7 

11 


1 1 C1 # 

1 1 J I» 








965# 


971# 




014006 






952# 


954# 






1051# 


1053# 


1132 


1191 


1208 


1313 


1323 






1672 


1675 


1741 


1746 


1748 


1785 


1839 






1991 


2000 


2059 


2062 


2071 


2074 


2140 






2264 


2273 


2276 


2279 


2310 


2317 


2355 






2474 


2482 


2484 


2494# 


2501 


2507 


2512 



ABS. 014006 



000 



ERRORS DETECTED: 0 

CZTMCD.BIN. CZTMCD.LST/CRF/S0L/NL:T0C=CZTI1CD. P1 1 
RUNTIME: 8 16 2 SECONDS 
Rt*HTIME RATIO: 65/27=2.3 
CORE USED: 6K (15 PAGES) 



SEO 0058 



1039# 


1041# 


1043# 


1326 


1329 


1355 


1848 


1871 


1874 


2142 


2178 


2197 


2357 


2402 


2405 


2515 


2770 





1045# 1047# 1C49# 

1647 1650 1653 

1883 1886 1889 

2211 2240 2261 

2408 2438 2468 



